Spherical law of cosines

Time bar (total: 19.9s)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated

analyze738.0ms (3.7%)

Memory
31.4MiB live, 2 352.4MiB allocated
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.8%0.2%0%0%0%0
0%0%99.8%0.2%0%0%0%1
0%0%99.8%0.2%0%0%0%2
0%0%99.8%0.2%0%0%0%3
0%0%99.8%0.2%0%0%0%4
0%0%99.8%0.2%0%0%0%5
0%0%99.8%0.2%0%0%0%6
0%0%99.8%0.2%0%0%0%7
0%0%99.8%0.2%0%0%0%8
0%0%99.8%0.2%0%0%0%9
0%0%99.8%0.2%0%0%0%10
1.6%1.6%98.2%0.2%0%0%0%11
1.6%1.6%98.2%0.2%0%0%0%12
Compiler

Compiled 21 to 19 computations (9.5% saved)

sample4.3s (21.6%)

Memory
-42.4MiB live, 11 675.8MiB allocated
Samples
3.0s6 232×1valid
399.0ms2 009×0valid
17.0ms15×2valid
Precisions
Click to see histograms. Total time spent on operations: 3.0s
ival-cos: 1.2s (40.8% of total)
ival-sin: 745.0ms (24.5% of total)
ival-mult: 373.0ms (12.3% of total)
ival-acos: 284.0ms (9.3% of total)
adjust: 245.0ms (8.1% of total)
ival-sub: 72.0ms (2.4% of total)
ival-add: 69.0ms (2.3% of total)
ival-true: 8.0ms (0.3% of total)
ival-assert: 4.0ms (0.1% of total)
Bogosity

explain359.0ms (1.8%)

Memory
-23.5MiB live, 1 137.9MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
69131(2.8466852226606007e-293 -2.205706730017907e-281 -2.636812448607039e+96 5.51854001361756e+263 5.713278311077812e-7)0-(cos.f64 (-.f64 lambda1 lambda2))
131(-2.931948789359802e-227 1.6606395392347816e+140 -3.5675024744343284e-273 1.1214951361001311e+122 -1.0468290092769809e+189)3(-1.6141192941785355e+159 6.72449929834618e-25 -1.1915869597801536e-303 -1.879320290192651e+206 -7.585097839396412e-202)(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
00-0-lambda2
00-0-phi2
00-0-(*.f64 (cos.f64 phi1) (cos.f64 phi2))
00-0-(-.f64 lambda1 lambda2)
00-0-R
00-0-(sin.f64 phi1)
00-0-(cos.f64 phi2)
00-0-lambda1
00-0-(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
00-0-(*.f64 (sin.f64 phi1) (sin.f64 phi2))
00-0-phi1
00-0-(sin.f64 phi2)
00-0-(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
00-0-(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
00-0-(cos.f64 phi1)
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
cos.f64(cos.f64 (-.f64 lambda1 lambda2))sensitivity2000
acos.f64(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))sensitivity115
Confusion
Predicted +Predicted -
+801
-13045
Precision
0.38095238095238093
Recall
0.9876543209876543
Confusion?
Predicted +Predicted MaybePredicted -
+8010
-130243
Precision?
0.38028169014084506
Recall?
1.0
Freqs
test
numberfreq
046
1209
21
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
204.0ms392×1valid
25.0ms118×0valid
2.0ms2valid
Compiler

Compiled 212 to 55 computations (74.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 191.0ms
ival-cos: 82.0ms (42.9% of total)
ival-sin: 42.0ms (22% of total)
ival-mult: 23.0ms (12% of total)
ival-acos: 18.0ms (9.4% of total)
adjust: 16.0ms (8.4% of total)
ival-sub: 5.0ms (2.6% of total)
ival-add: 4.0ms (2.1% of total)
ival-true: 1.0ms (0.5% of total)
ival-assert: 0.0ms (0% of total)

preprocess229.0ms (1.1%)

Memory
15.6MiB live, 95.1MiB allocated
Algorithm
egg-herbie
Rules
1 680×unsub-neg
1 486×distribute-rgt-in
1 320×distribute-lft-in
818×distribute-lft-neg-in
660×neg-mul-1
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0129399
1273393
2460385
3803385
41522385
51993385
62268385
72744385
83277385
93803385
104429385
114716385
124910385
134948385
146292385
156766385
166878385
176894385
186894385
196910385
206910385
216990385
227022385
237022385
01719
02919
13819
25019
35819
46719
58319
611619
714119
818519
920119
1020919
020918
Stop Event
iter limit
saturated
iter limit
saturated
Calls
Call 1
Inputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
Symmetry

(negabs R)

(sort lambda1 lambda2)

(sort phi1 phi2)

Compiler

Compiled 24 to 17 computations (29.2% saved)

eval0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated
Compiler

Compiled 5 to 5 computations (0% saved)

prune1.0ms (0%)

Memory
2.9MiB live, 2.9MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
75.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Compiler

Compiled 24 to 17 computations (29.2% saved)

simplify10.0ms (0.1%)

Memory
-10.3MiB live, 29.4MiB allocated
Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
cost-diff0
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
cost-diff128
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
Rules
96×lower-fma.f64
96×lower-fma.f32
80×lower-*.f32
72×lower-*.f64
36×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01792
02992
13892
25092
35892
46792
58392
611692
714192
818592
920192
1020992
020989
Stop Event
iter limit
saturated
iter limit
Calls
Call 1
Inputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R

localize145.0ms (0.7%)

Memory
-10.7MiB live, 432.9MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.20703125
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
accuracy0.21484375
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
accuracy2.508463760552225
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy14.681038471317523
(cos.f64 (-.f64 lambda1 lambda2))
Samples
104.0ms196×1valid
19.0ms59×0valid
1.0ms2valid
Compiler

Compiled 94 to 19 computations (79.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 98.0ms
ival-cos: 41.0ms (41.8% of total)
ival-sin: 24.0ms (24.5% of total)
ival-mult: 13.0ms (13.3% of total)
adjust: 8.0ms (8.2% of total)
ival-acos: 8.0ms (8.2% of total)
ival-sub: 2.0ms (2% of total)
ival-add: 2.0ms (2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series34.0ms (0.2%)

Memory
25.3MiB live, 104.9MiB allocated
Counts
5 → 204
Calls
Call 1
Inputs
#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())
#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())
#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
Outputs
#s(alt (* (cos phi2) (cos (- lambda1 lambda2))) (taylor 0 phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (sin phi2)) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2)))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (sin phi1)) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1))))) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<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 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<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 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<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 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
Calls

51 calls:

TimeVariablePointExpression
4.0ms
lambda1
@0
(cos (- lambda1 lambda2))
3.0ms
lambda1
@inf
(+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))
2.0ms
phi1
@inf
(+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))
2.0ms
lambda2
@inf
(+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))
2.0ms
phi2
@inf
(+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))

simplify266.0ms (1.3%)

Memory
-4.3MiB live, 631.2MiB allocated
Algorithm
egg-herbie
Rules
15 196×lower-fma.f64
15 196×lower-fma.f32
4 928×lower-*.f64
4 928×lower-*.f32
3 966×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01833258
15703232
217103191
331193166
468473165
081922972
Stop Event
iter limit
node limit
Counts
204 → 204
Calls
Call 1
Inputs
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
Outputs
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 phi1))) (fma.f64 (fma.f64 lambda1 (*.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (fma.f64 (fma.f64 lambda1 (*.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (fma.f64 lambda1 (*.f64 lambda1 #s(literal 1/6 binary64)) #s(literal -1 binary64))) lambda1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 lambda2 (*.f64 lambda2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 lambda2 (sin.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (fma.f64 (fma.f64 lambda2 (*.f64 lambda2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) (*.f64 lambda2 (*.f64 (fma.f64 lambda2 (*.f64 lambda2 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* phi1 (sin phi2))
(*.f64 phi1 (sin.f64 phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 phi2) (fma.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (sin.f64 phi2)))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* phi2 (sin phi1))
(*.f64 phi2 (sin.f64 phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(*.f64 phi2 (fma.f64 (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (sin.f64 phi1)))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(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 lambda1 (*.f64 #s(literal -1/2 binary64) (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 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (fma.f64 lambda1 (*.f64 lambda1 #s(literal 1/6 binary64)) #s(literal -1 binary64)))) (cos.f64 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(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 lambda2 (*.f64 #s(literal -1/2 binary64) (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 (sin.f64 lambda1) (fma.f64 lambda2 (*.f64 lambda2 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))) (cos.f64 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))

rewrite291.0ms (1.5%)

Memory
25.1MiB live, 701.6MiB allocated
Rules
6 996×lower-fma.f64
6 996×lower-fma.f32
5 494×lower-*.f32
5 486×lower-*.f64
3 040×lower-/.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01761
02961
18361
255461
3720461
0842658
Stop Event
iter limit
node limit
iter limit
Counts
5 → 218
Calls
Call 1
Inputs
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
Outputs
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi1) (/.f64 (*.f64 (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi2) (/.f64 (*.f64 (sin.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 (-.f64 (-.f64 phi1 phi2) phi1) phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (+.f64 phi1 (+.f64 phi2 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (-.f64 (-.f64 (-.f64 phi1 phi2) phi1) phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (+.f64 phi1 (+.f64 phi2 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (/.f64 (sin.f64 phi1) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (*.f64 (sin.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (/.f64 (sin.f64 phi2) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(neg.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))))
(neg.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(neg.f64 (/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))
(/.f64 (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 9 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 9 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (-.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 6 binary64))) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 6 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 6 binary64))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 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 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 9 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 6 binary64))) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))) (neg.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) #s(literal 1 binary64)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))
(/.f64 (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) #s(literal 1 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 9 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 9 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (-.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 6 binary64))) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal -1 binary64))
(*.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(*.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (*.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (/.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))
(*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))))
(*.f64 (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))))
(*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(*.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64))))
(*.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(*.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 (*.f64 R (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 R (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R) (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(fma.f64 R (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 R (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(/.f64 (*.f64 R (-.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)))) (fma.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64))))
(/.f64 (*.f64 R (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) R) (fma.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) R) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 R (acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (fma.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)) (fma.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)))))
(-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 #s(literal 1 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 #s(literal -1 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64))) (-.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) (fma.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (fma.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64) (pow.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64) (-.f64 (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(*.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)))))
(*.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(neg.f64 (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 1 binary64)))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (+.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 phi1 phi2))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 phi1 phi2)) (+.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 phi1 phi2)))))))
(/.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64))
(*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 (-.f64 (-.f64 phi1 phi2) phi1) phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (+.f64 phi1 (+.f64 phi2 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (-.f64 (-.f64 (-.f64 phi1 phi2) phi1) phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (+.f64 phi1 (+.f64 phi2 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 (neg.f64 lambda2))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.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)))))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2)) (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(cos.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)) (neg.f64 (+.f64 lambda1 lambda2))))
(cos.f64 (/.f64 (*.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (neg.f64 (-.f64 lambda1 lambda2))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(cos.f64 (/.f64 (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(-.f64 (/.f64 (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda1 lambda2))))
(-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (neg.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (neg.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))))))
(-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (neg.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (neg.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(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)))))
(fma.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2) (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(/.f64 #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) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (+.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 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.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))) (fma.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (-.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 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (+.f64 (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)))) (neg.f64 (fma.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (cos.f64 (+.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 (neg.f64 lambda2))) #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) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))))
(/.f64 (-.f64 (*.f64 (-.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 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (-.f64 (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))) (cos.f64 (+.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 #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) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda2))))

eval60.0ms (0.3%)

Memory
-2.3MiB live, 196.2MiB allocated
Compiler

Compiled 15 304 to 1 329 computations (91.3% saved)

prune112.0ms (0.6%)

Memory
-40.2MiB live, 368.7MiB allocated
Pruning

42 alts after pruning (42 fresh and 0 done)

PrunedKeptTotal
New38042422
Fresh000
Picked101
Done000
Total38142423
Accuracy
96.3%
Counts
423 → 42
Alt Table
Click to see full alt table
StatusAccuracyProgram
75.5%
(fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
75.2%
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) R) (fma.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64))))
75.3%
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) R) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
75.4%
(+.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R) (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
74.7%
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
74.9%
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
75.4%
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
75.3%
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
75.1%
(*.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
61.3%
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
61.7%
(*.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
95.8%
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
75.2%
(*.f64 (acos.f64 (fma.f64 (*.f64 (sin.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (/.f64 (sin.f64 phi2) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) R)
75.5%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
75.2%
(*.f64 (acos.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
54.1%
(*.f64 (acos.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
75.2%
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))) R)
61.1%
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
95.8%
(*.f64 (acos.f64 (+.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
95.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
95.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
95.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.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) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) R)
95.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))) (fma.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))) R)
75.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda2))))))) R)
44.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
53.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
75.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
40.6%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
39.6%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
35.8%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
45.7%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
37.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))))) R)
34.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R)
34.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
46.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
47.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
53.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
54.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
37.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2))))) R)
39.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
46.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
44.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
Compiler

Compiled 3 158 to 1 902 computations (39.8% saved)

simplify232.0ms (1.2%)

Memory
37.4MiB live, 394.3MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
cost-diff0
(acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
cost-diff0
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
cost-diff13440
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
cost-diff0
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
cost-diff0
(acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))
cost-diff0
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
cost-diff320
(-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))
cost-diff0
(acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
cost-diff128
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))
cost-diff128
(+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff0
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
cost-diff0
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
cost-diff0
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))
cost-diff0
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
cost-diff0
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
cost-diff0
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
cost-diff0
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
cost-diff128
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
Rules
9 478×lower-fma.f32
9 468×lower-fma.f64
4 198×lower-*.f32
4 160×lower-*.f64
2 146×unsub-neg
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
072751
0127736
1212733
2424733
3847723
41499723
51703723
61937723
72574723
83497723
95623723
107238723
117553723
127640723
137664723
147664723
08042701
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
(sin.f64 lambda2)
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(cos.f64 phi2)
phi2
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
R
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))))
(*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))
phi2
(*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))
(sin.f64 phi1)
phi1
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))
#s(literal 1 binary64)
(*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))
(*.f64 phi2 phi2)
(fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))
(*.f64 phi2 #s(literal 1/120 binary64))
#s(literal 1/120 binary64)
#s(literal -1/6 binary64)
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
phi2
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(cos.f64 (-.f64 phi1 phi2))
(-.f64 phi1 phi2)
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 phi1 phi2))
(+.f64 phi1 phi2)
R
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
(cos.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
(sin.f64 lambda2)
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
(sin.f64 phi2)
R
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
(sin.f64 lambda2)
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(cos.f64 phi2)
phi2
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
R
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) phi2))))))
(acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) phi2)))))
(+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) phi2))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) phi2)))
(*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) phi2))
phi2
(*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))
(*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)))
(sin.f64 phi1)
phi1
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))
(fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))
(*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))
(*.f64 phi2 phi2)
(fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))
(*.f64 phi2 #s(literal 1/120 binary64))
#s(literal 1/120 binary64)
#s(literal -1/6 binary64)
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 R (acos.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
(acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(acos.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))
(-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(cos.f64 phi2)
phi2
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(cos.f64 (-.f64 phi1 phi2))
(-.f64 phi1 phi2)
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))
(cos.f64 (+.f64 phi1 phi2))
(+.f64 phi1 phi2)
R
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
(cos.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
(sin.f64 lambda2)
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
(sin.f64 phi2)
R

localize616.0ms (3.1%)

Memory
-19.1MiB live, 1 657.0MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.20703125
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
accuracy0.21484375
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
accuracy0.2611761207265445
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
accuracy2.508463760552225
(acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
accuracy2.508463760552225
(acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))
accuracy14.314051984535576
(cos.f64 (+.f64 phi1 phi2))
accuracy14.549745234874822
(cos.f64 (-.f64 phi1 phi2))
accuracy14.68103847131752
(cos.f64 (-.f64 lambda1 lambda2))
accuracy1.4178917947962546
(*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))
accuracy2.508463760552225
(acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy14.68103847131752
(cos.f64 (-.f64 lambda1 lambda2))
accuracy30.188114606931517
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))))
accuracy0.21484375
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
accuracy2.508463760552225
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))
accuracy14.681038471317523
(cos.f64 (-.f64 lambda2 lambda1))
accuracy30.385175815532314
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
accuracy0.18359375
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
accuracy0.20703125
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
accuracy0.21484375
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
accuracy2.508463760552225
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
Samples
494.0ms251×1valid
3.0ms2valid
3.0ms0valid
Compiler

Compiled 678 to 65 computations (90.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 429.0ms
ival-cos: 173.0ms (40.3% of total)
ival-mult: 72.0ms (16.8% of total)
ival-sin: 46.0ms (10.7% of total)
ival-add: 42.0ms (9.8% of total)
adjust: 38.0ms (8.9% of total)
ival-acos: 36.0ms (8.4% of total)
const: 12.0ms (2.8% of total)
ival-sub: 9.0ms (2.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series160.0ms (0.8%)

Memory
-2.2MiB live, 394.3MiB allocated
Counts
27 → 1 104
Calls
Call 1
Inputs
#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())
#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())
#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())
#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())
#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())
#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())
#s(alt (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (patch (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #<representation binary64>) () ())
#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())
#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())
#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())
#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())
#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())
#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())
#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())
Outputs
#s(alt (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (patch (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (patch (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (sin phi2)) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2)))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (sin phi1)) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1))))) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda1 lambda2))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (neg lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (cos phi2)) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (patch (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda1 lambda2))) (taylor 0 phi1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi2) (#s(alt (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (patch (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/6 (pow phi2 2))) (taylor 0 phi2) (#s(alt (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (patch (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))) (taylor 0 phi2) (#s(alt (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (patch (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))) (taylor 0 phi2) (#s(alt (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (patch (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow phi2 4)) (taylor inf phi2) (#s(alt (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (patch (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi2 4) (- 1/120 (* 1/6 (/ 1 (pow phi2 2))))) (taylor inf phi2) (#s(alt (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (patch (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi2 4) (- (+ 1/120 (/ 1 (pow phi2 4))) (* 1/6 (/ 1 (pow phi2 2))))) (taylor inf phi2) (#s(alt (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (patch (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi2 4) (- (+ 1/120 (/ 1 (pow phi2 4))) (* 1/6 (/ 1 (pow phi2 2))))) (taylor inf phi2) (#s(alt (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (patch (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow phi2 4)) (taylor -inf phi2) (#s(alt (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (patch (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi2 4) (- 1/120 (* 1/6 (/ 1 (pow phi2 2))))) (taylor -inf phi2) (#s(alt (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (patch (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi2 4) (- (+ 1/120 (/ 1 (pow phi2 4))) (* 1/6 (/ 1 (pow phi2 2))))) (taylor -inf phi2) (#s(alt (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (patch (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi2 4) (- (+ 1/120 (/ 1 (pow phi2 4))) (* 1/6 (/ 1 (pow phi2 2))))) (taylor -inf phi2) (#s(alt (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (patch (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (patch (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (* -1/2 (sin (neg phi2))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/4 (cos (neg phi2)))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* -1/4 (cos (neg phi2))) (* phi1 (- (* 1/12 (sin (neg phi2))) (* 1/12 (sin phi2)))))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (- (* 1/2 (sin phi1)) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (- (+ (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (sin phi1))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (- (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* phi2 (- (* -1/12 (sin phi1)) (* 1/12 (sin phi1))))))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* phi1 (sin (neg phi2)))) (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/4 (cos (neg phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2))))))))) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos phi1)) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos phi1)) (+ (* 1/2 (* phi2 (sin phi1))) (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos phi1)) (+ (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/4 (cos phi1)))))) (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos phi1)) (+ (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1)))))))) (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (cos phi2)) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* (cos lambda2) (cos phi2))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* 1/24 (* (pow phi1 2) (* (cos lambda2) (cos phi2))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* 1/24 (* (cos lambda2) (cos phi2)))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (cos phi1)) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))) (* (cos lambda2) (cos phi1))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* 1/24 (* (pow phi2 2) (* (cos lambda2) (cos phi1))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))) (* 1/24 (* (cos lambda2) (cos phi1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos phi2)) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (cos phi2))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda2 2) (* (cos phi1) (cos phi2))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (sin lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda1)) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (sin phi2)) (taylor 0 phi1) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2))))) (taylor 0 phi1) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2))))))) (taylor 0 phi1) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2)))))))) (taylor 0 phi1) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (sin phi1)) (taylor 0 phi2) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1))))) (taylor 0 phi2) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1))))))) (taylor 0 phi2) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (patch #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<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 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<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 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<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 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (+ (* -1/6 (* (pow phi1 2) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))) (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (+ (* (pow phi1 2) (+ (* -1/6 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))) (* 1/120 (* (pow phi1 2) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))) (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (+ (* (pow phi1 2) (+ (* -1/6 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))) (* 1/120 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))))))) (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sin phi1) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (* (pow phi2 4) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi2 4) (+ (* -1/6 (/ (sin phi1) (pow phi2 2))) (* 1/120 (sin phi1)))) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi2 4) (+ (* -1/6 (/ (sin phi1) (pow phi2 2))) (+ (* 1/120 (sin phi1)) (/ (sin phi1) (pow phi2 4))))) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi2 4) (+ (* -1/6 (/ (sin phi1) (pow phi2 2))) (+ (* 1/120 (sin phi1)) (/ (sin phi1) (pow phi2 4))))) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (* (pow phi2 4) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi2 4) (+ (* -1/6 (/ (sin phi1) (pow phi2 2))) (* 1/120 (sin phi1)))) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi2 4) (+ (* -1/6 (/ (sin phi1) (pow phi2 2))) (+ (* 1/120 (sin phi1)) (/ (sin phi1) (pow phi2 4))))) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi2 4) (+ (* -1/6 (/ (sin phi1) (pow phi2 2))) (+ (* 1/120 (sin phi1)) (/ (sin phi1) (pow phi2 4))))) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (patch (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #<representation binary64>) () ())) ())
#s(alt (cos (neg phi2)) (taylor 0 phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<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 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 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 (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos phi1) (taylor 0 phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (sin phi1))) (taylor 0 phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1))))) (taylor 0 phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 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 (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi2) (* -1 (* phi1 (sin phi2)))) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2)))) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2)))) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos phi1) (taylor 0 phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* -1 (* phi2 (sin phi1)))) (taylor 0 phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1)))) (taylor 0 phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1)))) (taylor 0 phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
Calls

276 calls:

TimeVariablePointExpression
12.0ms
phi1
@-inf
(* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6))))
7.0ms
lambda2
@inf
(* (cos phi2) (cos (- lambda2 lambda1)))
5.0ms
phi1
@0
(* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6))))
3.0ms
lambda2
@-inf
(+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))
3.0ms
lambda2
@inf
(+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2))))

simplify400.0ms (2%)

Memory
14.5MiB live, 847.1MiB allocated
Algorithm
egg-herbie
Rules
16 804×lower-fma.f64
16 804×lower-fma.f32
7 746×lower-*.f64
7 746×lower-*.f32
3 916×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
071321607
1236421371
2698921323
0904819772
Stop Event
iter limit
node limit
Counts
1 104 → 1 104
Calls
Call 1
Inputs
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(cos (- lambda2 lambda1))
(+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1)))))
(+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1)))))))
(+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (neg lambda1)))
(+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(* (cos lambda2) (cos phi2))
(+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
1
(+ 1 (* -1/6 (pow phi2 2)))
(+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))
(+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))
(* 1/120 (pow phi2 4))
(* (pow phi2 4) (- 1/120 (* 1/6 (/ 1 (pow phi2 2)))))
(* (pow phi2 4) (- (+ 1/120 (/ 1 (pow phi2 4))) (* 1/6 (/ 1 (pow phi2 2)))))
(* (pow phi2 4) (- (+ 1/120 (/ 1 (pow phi2 4))) (* 1/6 (/ 1 (pow phi2 2)))))
(* 1/120 (pow phi2 4))
(* (pow phi2 4) (- 1/120 (* 1/6 (/ 1 (pow phi2 2)))))
(* (pow phi2 4) (- (+ 1/120 (/ 1 (pow phi2 4))) (* 1/6 (/ 1 (pow phi2 2)))))
(* (pow phi2 4) (- (+ 1/120 (/ 1 (pow phi2 4))) (* 1/6 (/ 1 (pow phi2 2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(- (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (* -1/2 (sin (neg phi2))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/4 (cos (neg phi2)))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* -1/4 (cos (neg phi2))) (* phi1 (- (* 1/12 (sin (neg phi2))) (* 1/12 (sin phi2)))))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (- (* 1/2 (sin phi1)) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (- (+ (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (sin phi1))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (- (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* phi2 (- (* -1/12 (sin phi1)) (* 1/12 (sin phi1))))))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* -1/2 (* phi1 (sin (neg phi2)))) (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/4 (cos (neg phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2))))))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* 1/2 (cos phi1)) (+ (* 1/2 (* phi2 (sin phi1))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos phi1)) (+ (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/4 (cos phi1)))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos phi1)) (+ (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1)))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos lambda2) (cos phi2))
(+ (* -1/2 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* (cos lambda2) (cos phi2)))
(+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* 1/24 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))))))
(+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* 1/24 (* (cos lambda2) (cos phi2))))))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (cos phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))) (* (cos lambda2) (cos phi1)))
(+ (* (cos lambda2) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* 1/24 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))))))
(+ (* (cos lambda2) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))) (* 1/24 (* (cos lambda2) (cos phi1))))))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos phi1) (cos phi2))
(+ (* -1/2 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (cos phi2)))
(+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))))))
(+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2))))))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(* lambda1 (sin lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* lambda2 (sin lambda1))
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(* phi1 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))
(* phi1 (+ 1 (+ (* -1/6 (* (pow phi1 2) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))) (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))))
(* phi1 (+ 1 (+ (* (pow phi1 2) (+ (* -1/6 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))) (* 1/120 (* (pow phi1 2) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))) (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))))
(* phi1 (+ 1 (+ (* (pow phi1 2) (+ (* -1/6 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))) (* 1/120 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))))))) (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))))
(* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))
(* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))
(* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))
(* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))
(* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))
(* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))
(* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))
(* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))
(sin phi1)
(+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1))))
(+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1))))))
(+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1))))))
(* 1/120 (* (pow phi2 4) (sin phi1)))
(* (pow phi2 4) (+ (* -1/6 (/ (sin phi1) (pow phi2 2))) (* 1/120 (sin phi1))))
(* (pow phi2 4) (+ (* -1/6 (/ (sin phi1) (pow phi2 2))) (+ (* 1/120 (sin phi1)) (/ (sin phi1) (pow phi2 4)))))
(* (pow phi2 4) (+ (* -1/6 (/ (sin phi1) (pow phi2 2))) (+ (* 1/120 (sin phi1)) (/ (sin phi1) (pow phi2 4)))))
(* 1/120 (* (pow phi2 4) (sin phi1)))
(* (pow phi2 4) (+ (* -1/6 (/ (sin phi1) (pow phi2 2))) (* 1/120 (sin phi1))))
(* (pow phi2 4) (+ (* -1/6 (/ (sin phi1) (pow phi2 2))) (+ (* 1/120 (sin phi1)) (/ (sin phi1) (pow phi2 4)))))
(* (pow phi2 4) (+ (* -1/6 (/ (sin phi1) (pow phi2 2))) (+ (* 1/120 (sin phi1)) (/ (sin phi1) (pow phi2 4)))))
(cos (neg phi2))
(+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2)))))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (neg (+ phi2 (* -1 phi1))))
(cos (neg (+ phi2 (* -1 phi1))))
(cos (neg (+ phi2 (* -1 phi1))))
(cos (neg (+ phi2 (* -1 phi1))))
(cos phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1)))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1)))))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
Outputs
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi1 (sin.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi1 (fma.f64 (*.f64 phi1 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi1 (fma.f64 (*.f64 phi1 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi2 (fma.f64 (*.f64 phi2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi2 (fma.f64 (*.f64 phi2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 lambda2 (sin.f64 lambda1))))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda2 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) lambda1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda1 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda2)) (*.f64 lambda1 (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* phi1 (sin phi2))
(*.f64 phi1 (sin.f64 phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(*.f64 phi1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2)))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (sin.f64 phi2)))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(*.f64 phi1 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64)))))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* phi2 (sin phi1))
(*.f64 phi2 (sin.f64 phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(*.f64 phi2 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1)))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(*.f64 phi2 (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(*.f64 phi2 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi2 phi2) #s(literal 1/120 binary64))) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 phi1 (fma.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 phi1 (fma.f64 (*.f64 phi1 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (fma.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (fma.f64 (*.f64 phi2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) lambda1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 lambda2 (sin.f64 lambda1))))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda2 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1)))))))
(fma.f64 (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (neg lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 lambda1))
(+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (*.f64 lambda2 (sin.f64 lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 lambda2 (fma.f64 (cos.f64 phi2) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (neg.f64 (cos.f64 phi2))) (*.f64 lambda2 #s(literal 1/6 binary64)))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos lambda2) (cos phi2))
(*.f64 (cos.f64 phi2) (cos.f64 lambda2))
(+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) lambda1)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (*.f64 lambda1 (fma.f64 (cos.f64 phi2) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) lambda1)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(fma.f64 lambda1 (fma.f64 (cos.f64 phi2) (sin.f64 lambda2) (*.f64 lambda1 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 lambda1 #s(literal -1/6 binary64)))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 phi1 (fma.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 phi1 (fma.f64 (*.f64 phi1 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (fma.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (fma.f64 (*.f64 phi2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) lambda1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 lambda2 (sin.f64 lambda1))))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda2 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
1
#s(literal 1 binary64)
(+ 1 (* -1/6 (pow phi2 2)))
(fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64))
(+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))
(fma.f64 (*.f64 phi2 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))
(fma.f64 (*.f64 phi2 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(* 1/120 (pow phi2 4))
(*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)))
(* (pow phi2 4) (- 1/120 (* 1/6 (/ 1 (pow phi2 2)))))
(*.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2))))
(* (pow phi2 4) (- (+ 1/120 (/ 1 (pow phi2 4))) (* 1/6 (/ 1 (pow phi2 2)))))
(*.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2))) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)))))
(* (pow phi2 4) (- (+ 1/120 (/ 1 (pow phi2 4))) (* 1/6 (/ 1 (pow phi2 2)))))
(*.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2))) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)))))
(* 1/120 (pow phi2 4))
(*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)))
(* (pow phi2 4) (- 1/120 (* 1/6 (/ 1 (pow phi2 2)))))
(*.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2))))
(* (pow phi2 4) (- (+ 1/120 (/ 1 (pow phi2 4))) (* 1/6 (/ 1 (pow phi2 2)))))
(*.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2))) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)))))
(* (pow phi2 4) (- (+ 1/120 (/ 1 (pow phi2 4))) (* 1/6 (/ 1 (pow phi2 2)))))
(*.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2))) (+.f64 #s(literal 1/120 binary64) (/.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(- (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (* -1/2 (sin (neg phi2))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(+.f64 (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 phi1 #s(literal -1/2 binary64)) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2)))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/4 (cos (neg phi2)))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(+.f64 (fma.f64 phi1 (fma.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* -1/4 (cos (neg phi2))) (* phi1 (- (* 1/12 (sin (neg phi2))) (* 1/12 (sin phi2)))))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(+.f64 (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 phi1 #s(literal 1/12 binary64)) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2)))))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* phi2 (- (* 1/2 (sin phi1)) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi2 (- (+ (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (sin phi1))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (fma.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi2 (- (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* phi2 (- (* -1/12 (sin phi1)) (* 1/12 (sin phi1))))))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (fma.f64 (*.f64 phi2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 lambda2 (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 lambda2 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (cos (- lambda1 lambda2))))
(*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))
(+ (* -1/2 (* phi1 (sin (neg phi2)))) (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (*.f64 phi1 (*.f64 (sin.f64 phi2) #s(literal 1/2 binary64))))
(+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/4 (cos (neg phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (*.f64 phi1 (fma.f64 phi1 (fma.f64 (cos.f64 phi2) #s(literal -1/4 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (*.f64 (sin.f64 phi2) #s(literal 1/2 binary64)))))
(+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2))))))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (*.f64 (sin.f64 phi2) #s(literal -1/12 binary64)) (fma.f64 (cos.f64 phi2) #s(literal -1/4 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))) (*.f64 (sin.f64 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))
(+ (* 1/2 (cos phi1)) (+ (* 1/2 (* phi2 (sin phi1))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (*.f64 phi2 (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))))
(+ (* 1/2 (cos phi1)) (+ (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/4 (cos phi1)))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (*.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi1) #s(literal -1/4 binary64))) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))
(+ (* 1/2 (cos phi1)) (+ (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1)))))))) (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 phi2 (*.f64 (sin.f64 phi1) #s(literal -1/12 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi1) #s(literal -1/4 binary64)))) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 lambda2 (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 lambda2 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi1 (sin.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi1 (fma.f64 (*.f64 phi1 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi1 (fma.f64 (*.f64 phi1 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi2 (fma.f64 (*.f64 phi2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi2 (fma.f64 (*.f64 phi2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 lambda2 (sin.f64 lambda1))))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda2 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) lambda1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda1 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda2)) (*.f64 lambda1 (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos lambda2) (cos phi2))
(*.f64 (cos.f64 phi2) (cos.f64 lambda2))
(+ (* -1/2 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* (cos lambda2) (cos phi2)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
(+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* 1/24 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))))))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))
(+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* 1/24 (* (cos lambda2) (cos phi2))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (cos phi1))
(*.f64 (cos.f64 lambda2) (cos.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))) (* (cos lambda2) (cos phi1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* (cos lambda2) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* 1/24 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi1) (*.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64)))))
(+ (* (cos lambda2) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))) (* 1/24 (* (cos lambda2) (cos phi1))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64)))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos phi1) (cos phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(+ (* -1/2 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (cos phi2)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda2 lambda2) #s(literal -1/2 binary64)))))
(+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2) #s(literal 1/24 binary64))))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(*.f64 lambda1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (sin.f64 lambda2)))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(*.f64 lambda1 (fma.f64 lambda1 (*.f64 lambda1 (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64)))) (sin.f64 lambda2)))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(*.f64 lambda1 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* lambda2 (sin lambda1))
(*.f64 lambda2 (sin.f64 lambda1))
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(*.f64 lambda2 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (sin.f64 lambda1)))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(*.f64 lambda2 (fma.f64 (*.f64 lambda2 lambda2) (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (sin.f64 lambda1)))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(*.f64 lambda2 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64))) (*.f64 (*.f64 lambda2 lambda2) (*.f64 lambda2 lambda2)))))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) lambda2) (sin.f64 lambda1)) (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 lambda1) #s(literal -1/2 binary64) (*.f64 (sin.f64 (neg.f64 lambda1)) (*.f64 lambda2 #s(literal 1/6 binary64)))) (sin.f64 lambda1)) (cos.f64 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (sin.f64 lambda2))) (cos.f64 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(* phi1 (sin phi2))
(*.f64 phi1 (sin.f64 phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(*.f64 phi1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2)))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (sin.f64 phi2)))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(*.f64 phi1 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64)))))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* phi2 (sin phi1))
(*.f64 phi2 (sin.f64 phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(*.f64 phi2 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1)))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(*.f64 phi2 (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(*.f64 phi2 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi2 phi2) #s(literal 1/120 binary64))) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(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 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (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 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 #s(literal 1/6 binary64)) (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (sin.f64 lambda2)) (cos.f64 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(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 (cos.f64 lambda1) lambda2) (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 (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (sin.f64 lambda1))) (cos.f64 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(* phi1 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))
(fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)
(* phi1 (+ 1 (+ (* -1/6 (* (pow phi1 2) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))) (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))))
(*.f64 phi1 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal -1/6 binary64)) phi1) phi1 (fma.f64 (*.f64 phi2 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64))))
(* phi1 (+ 1 (+ (* (pow phi1 2) (+ (* -1/6 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))) (* 1/120 (* (pow phi1 2) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))))) (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))))
(fma.f64 phi1 (fma.f64 phi2 (*.f64 phi2 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64))) (*.f64 (*.f64 phi1 phi1) (*.f64 (fma.f64 (*.f64 phi2 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))))) phi1)
(* phi1 (+ 1 (+ (* (pow phi1 2) (+ (* -1/6 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))) (* 1/120 (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))))))) (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6)))))
(fma.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (fma.f64 #s(literal -1/6 binary64) (fma.f64 (*.f64 phi2 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 (fma.f64 (*.f64 phi2 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))))) (*.f64 phi2 (*.f64 phi2 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64))))) phi1)
(* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* (sin phi1) (+ 1 (* (pow phi2 2) (- (* 1/120 (pow phi2 2)) 1/6))))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(sin phi1)
(sin.f64 phi1)
(+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1))))
(*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1))
(+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1))))))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1))))))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(* 1/120 (* (pow phi2 4) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) #s(literal 1/120 binary64)) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)))
(* (pow phi2 4) (+ (* -1/6 (/ (sin phi1) (pow phi2 2))) (* 1/120 (sin phi1))))
(*.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (fma.f64 (sin.f64 phi1) #s(literal 1/120 binary64) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 phi1)) (*.f64 phi2 phi2))))
(* (pow phi2 4) (+ (* -1/6 (/ (sin phi1) (pow phi2 2))) (+ (* 1/120 (sin phi1)) (/ (sin phi1) (pow phi2 4)))))
(*.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (fma.f64 (sin.f64 phi1) (/.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) (fma.f64 (sin.f64 phi1) #s(literal 1/120 binary64) (/.f64 (sin.f64 phi1) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2))))))
(* (pow phi2 4) (+ (* -1/6 (/ (sin phi1) (pow phi2 2))) (+ (* 1/120 (sin phi1)) (/ (sin phi1) (pow phi2 4)))))
(*.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (fma.f64 (sin.f64 phi1) (/.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) (fma.f64 (sin.f64 phi1) #s(literal 1/120 binary64) (/.f64 (sin.f64 phi1) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2))))))
(* 1/120 (* (pow phi2 4) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) #s(literal 1/120 binary64)) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)))
(* (pow phi2 4) (+ (* -1/6 (/ (sin phi1) (pow phi2 2))) (* 1/120 (sin phi1))))
(*.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (fma.f64 (sin.f64 phi1) #s(literal 1/120 binary64) (/.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 phi1)) (*.f64 phi2 phi2))))
(* (pow phi2 4) (+ (* -1/6 (/ (sin phi1) (pow phi2 2))) (+ (* 1/120 (sin phi1)) (/ (sin phi1) (pow phi2 4)))))
(*.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (fma.f64 (sin.f64 phi1) (/.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) (fma.f64 (sin.f64 phi1) #s(literal 1/120 binary64) (/.f64 (sin.f64 phi1) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2))))))
(* (pow phi2 4) (+ (* -1/6 (/ (sin phi1) (pow phi2 2))) (+ (* 1/120 (sin phi1)) (/ (sin phi1) (pow phi2 4)))))
(*.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (fma.f64 (sin.f64 phi1) (/.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) (fma.f64 (sin.f64 phi1) #s(literal 1/120 binary64) (/.f64 (sin.f64 phi1) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 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 phi1 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (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 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2))) (cos.f64 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(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 phi2 (*.f64 #s(literal -1/2 binary64) (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 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1))) (cos.f64 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi2 phi1))
(cos phi2)
(cos.f64 phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(-.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(fma.f64 phi1 (-.f64 (*.f64 phi1 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (sin.f64 phi2)) (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 phi1 (sin.f64 phi2)) #s(literal 1/6 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (sin.f64 (neg.f64 phi2))) (cos.f64 phi2))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(-.f64 (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(fma.f64 phi2 (-.f64 (*.f64 phi2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(fma.f64 phi2 (-.f64 (*.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 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))

rewrite358.0ms (1.8%)

Memory
5.1MiB live, 795.9MiB allocated
Rules
7 238×lower-*.f32
7 202×lower-*.f64
4 152×lower-fma.f32
4 142×lower-fma.f64
3 578×lower-/.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
072517
0127466
1416463
23094463
010492442
Stop Event
iter limit
node limit
iter limit
Counts
27 → 568
Calls
Call 1
Inputs
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))
(cos.f64 (-.f64 phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
Outputs
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (/.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (cos.f64 lambda1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 lambda2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(pow.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #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) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(*.f64 (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 4 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64))
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1))))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1))))) #s(literal -2 binary64))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #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) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (cos.f64 (+.f64 lambda2 lambda1)))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1))))) #s(literal -1 binary64))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64))
(+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))
(+.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(-.f64 (/.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 2 binary64)) (-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (/.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (cos.f64 lambda1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (-.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (-.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 2 binary64)) (*.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))) (-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))
(/.f64 (-.f64 (*.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 2 binary64)) (-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (*.f64 (-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) (*.f64 (-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (-.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))) (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))
(+.f64 (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #s(literal 1 binary64))
(+.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)))) (fma.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64))))) (*.f64 (*.f64 phi2 phi2) #s(literal -1/6 binary64)))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))) (/.f64 (*.f64 phi2 (*.f64 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))))
(fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64))
(fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)))) (fma.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(fma.f64 phi2 (*.f64 (*.f64 phi2 #s(literal 1/120 binary64)) (*.f64 phi2 phi2)) (fma.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #s(literal 1 binary64))
(fma.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 phi2 phi2) (*.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64))) (fma.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi2 #s(literal 1/120 binary64)) (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(fma.f64 (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64))) (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi2 #s(literal 1/120 binary64)) (fma.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) phi2 #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) #s(literal 1/120 binary64) (fma.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64))) phi2) phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 1 binary64) phi2) (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 phi2 phi2)) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 1 binary64) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 phi2 phi2) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 #s(literal 1/120 binary64))) phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (-.f64 (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (*.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))))))
(/.f64 (fma.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (*.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #s(literal 1 binary64)) (fma.f64 (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (-.f64 (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (fma.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (*.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #s(literal 1 binary64)) (fma.f64 phi2 (*.f64 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (*.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #s(literal 1 binary64))) (neg.f64 (fma.f64 (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (-.f64 (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))))
(/.f64 (-.f64 (*.f64 phi2 (*.f64 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))) #s(literal 1 binary64)) (-.f64 (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (*.f64 phi2 (*.f64 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (-.f64 (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (*.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))))) #s(literal -1 binary64))
(*.f64 (fma.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (*.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (-.f64 (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))
(*.f64 (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64))))
(+.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(-.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))
(-.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))) (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 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 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))) (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 phi2))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (cos.f64 lambda1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64))))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi2))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (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)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64)))
(fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #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 phi1 phi2))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64)))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))) (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #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 phi1 phi2))))) #s(literal 1/4 binary64)))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))) (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #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 phi1 phi2))))) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #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 phi1 phi2))))) #s(literal 1/4 binary64))) (-.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))) (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #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 phi1 phi2))))) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))) (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))) (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))) (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))) (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))) (*.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #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 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 1/4 binary64)))) (*.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #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) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))) (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))) (-.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #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 phi1 phi2))))) #s(literal 1/4 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #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 phi1 phi2))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))) (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #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 phi1 phi2))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))))
(*.f64 (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) R)
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(+.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.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 phi2))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (cos.f64 lambda1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #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 phi1 phi2))))) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #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 phi2))))) #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #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 phi1 phi2))))) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #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 phi1 phi2))))) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.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 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 1/4 binary64)))) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #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 phi1 phi2))))) #s(literal 1/4 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #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 phi1 phi2))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (/.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (cos.f64 lambda1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 lambda2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(pow.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #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) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(*.f64 (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (*.f64 (cos.f64 lambda2) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2))
(-.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 4 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -1 binary64))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 (neg.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (/.f64 (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.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 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(/.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) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #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) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #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) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #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) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (-.f64 (*.f64 (-.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 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (-.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 (*.f64 #s(literal 2 binary64) lambda2))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 lambda2 lambda1))))))
(pow.f64 (/.f64 (fma.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #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) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 (neg.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (/.f64 (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.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 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(/.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) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #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) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #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) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #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) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (-.f64 (*.f64 (-.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 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (-.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 (*.f64 #s(literal 2 binary64) lambda2))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 lambda2 lambda1))))))
(pow.f64 (/.f64 (fma.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #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) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(+.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))
(+.f64 (*.f64 (sin.f64 phi1) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) (sin.f64 phi1))
(fma.f64 (sin.f64 phi1) #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))
(fma.f64 (sin.f64 phi1) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (sin.f64 phi1))
(fma.f64 phi2 (*.f64 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (sin.f64 phi1)) (sin.f64 phi1))
(fma.f64 #s(literal 1 binary64) (sin.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))
(fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (sin.f64 phi1)) (sin.f64 phi1))
(fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (*.f64 (*.f64 phi2 phi2) (sin.f64 phi1)) (sin.f64 phi1))
(fma.f64 (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (sin.f64 phi1) (sin.f64 phi1))
(fma.f64 (*.f64 (sin.f64 phi1) phi2) (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (sin.f64 phi1))
(fma.f64 (*.f64 (sin.f64 phi1) (*.f64 phi2 phi2)) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (sin.f64 phi1))
(fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 phi2 phi2) (sin.f64 phi1))
(/.f64 (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #s(literal 3 binary64))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))))))
(/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #s(literal 2 binary64))) (-.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))))
(/.f64 (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (*.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #s(literal 1 binary64))) (fma.f64 (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (-.f64 (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (sin.f64 phi1) (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))))))) (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))
(/.f64 (*.f64 (fma.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (*.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))) #s(literal 1 binary64)) (sin.f64 phi1)) (fma.f64 (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) (-.f64 (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (sin.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))
(*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)))
(*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (sin.f64 phi1))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.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))
(-.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)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (cos.f64 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 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (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 (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 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (cos.f64 (+.f64 phi1 phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 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))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 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 (-.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (cos.f64 (-.f64 phi1 phi2)))
(/.f64 (-.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64)))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal 4 binary64))

eval241.0ms (1.2%)

Memory
44.8MiB live, 673.3MiB allocated
Compiler

Compiled 57 328 to 3 513 computations (93.9% saved)

prune365.0ms (1.8%)

Memory
-19.3MiB live, 991.9MiB allocated
Pruning

65 alts after pruning (64 fresh and 1 done)

PrunedKeptTotal
New1 753471 800
Fresh201737
Picked415
Done000
Total1 777651 842
Accuracy
96.4%
Counts
1 842 → 65
Alt Table
Click to see full alt table
StatusAccuracyProgram
75.5%
(fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
75.2%
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) R) (fma.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64))))
75.3%
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) R) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
75.4%
(+.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R) (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
74.7%
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
74.9%
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
75.4%
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
39.5%
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))) R)
43.8%
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
75.2%
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))) R)
39.4%
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))))) R)
43.8%
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))))) R)
43.8%
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
75.1%
(*.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
61.1%
(*.f64 (acos.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64)))) R)
61.7%
(*.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
95.8%
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
75.2%
(*.f64 (acos.f64 (fma.f64 (*.f64 (sin.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (/.f64 (sin.f64 phi2) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) R)
39.6%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
75.5%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
53.8%
(*.f64 (acos.f64 (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
75.2%
(*.f64 (acos.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
95.8%
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
75.2%
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))) R)
76.0%
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
75.9%
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (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) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
43.0%
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 #s(approx (cos (+ phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64)))) R)
44.3%
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(approx (cos (- phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
41.8%
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
44.0%
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
95.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.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) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) R)
53.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
75.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
25.9%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
28.0%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
57.8%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
28.5%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
49.5%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
58.2%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
39.3%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
44.9%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
46.3%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
49.4%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1))))) R)
47.0%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi1 (sin.f64 phi2))))) R)
95.8%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
54.5%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
53.0%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
56.4%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
34.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
53.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
37.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2))))) R)
34.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
34.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
44.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
53.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
43.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
43.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
44.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
25.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
23.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
25.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
30.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
31.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
20.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
28.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
Compiler

Compiled 4 692 to 2 733 computations (41.8% saved)

simplify433.0ms (2.2%)

Memory
-9.7MiB live, 306.5MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
cost-diff0
(acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))
cost-diff0
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
cost-diff320
(-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))
cost-diff0
#s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
cost-diff0
(acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
cost-diff0
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
cost-diff192
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
cost-diff0
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))
cost-diff0
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))))
cost-diff0
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
cost-diff6080
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))
cost-diff0
#s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))
cost-diff0
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))
cost-diff0
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))))
cost-diff0
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
cost-diff0
(*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))
cost-diff0
(acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
cost-diff0
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
cost-diff13440
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
Rules
8 152×lower-fma.f32
8 136×lower-fma.f64
2 732×lower-*.f32
2 698×lower-*.f64
1 608×unsub-neg
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
084854
0142854
1230830
2372830
3568830
4834830
51513830
62563830
74115830
85130830
95537830
105795830
115803830
125805830
135892830
145993830
156016830
166021830
176026830
186030830
196032830
206032830
216486830
226682830
236682830
246682830
256688830
06688811
Stop Event
iter limit
saturated
iter limit
Calls
Call 1
Inputs
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
(acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
lambda1
(sin.f64 lambda2)
lambda2
(cos.f64 phi2)
phi2
(cos.f64 phi1)
phi1
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(sin.f64 phi1)
(sin.f64 phi2)
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))
#s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))
(cos.f64 phi2)
phi2
#s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))
lambda1
(fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))
(*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))
(cos.f64 lambda2)
lambda2
#s(literal -1/2 binary64)
(sin.f64 lambda2)
R
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
#s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
#s(literal -1/2 binary64)
(cos.f64 (+.f64 phi2 phi1))
(+.f64 phi2 phi1)
phi2
phi1
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(cos.f64 phi2)
(*.f64 (cos.f64 phi1) (cos.f64 lambda1))
(cos.f64 phi1)
(cos.f64 lambda1)
lambda1
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
#s(literal 1/2 binary64)
(cos.f64 (-.f64 phi2 phi1))
(-.f64 phi2 phi1)
R
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
(*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(cos.f64 (-.f64 phi1 phi2))
(-.f64 phi1 phi2)
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 phi1 phi2))
(+.f64 phi1 phi2)
R
Outputs
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
lambda1
(sin.f64 lambda2)
lambda2
(cos.f64 phi2)
phi2
(cos.f64 phi1)
phi1
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(sin.f64 phi1)
(sin.f64 phi2)
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))
#s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda2 lambda1)
lambda2
lambda1
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (cos.f64 lambda2) (fma.f64 lambda1 (*.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 lambda1 (sin.f64 lambda2))))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (cos.f64 lambda2) (fma.f64 lambda1 (*.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 lambda1 (sin.f64 lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (cos.f64 lambda2) (fma.f64 lambda1 (*.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 lambda1 (sin.f64 lambda2))))))
(*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))
(*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (cos.f64 lambda2) (fma.f64 lambda1 (*.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 lambda1 (sin.f64 lambda2)))))
(cos.f64 phi2)
phi2
#s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))
#s(approx (cos (- lambda2 lambda1)) (fma.f64 (cos.f64 lambda2) (fma.f64 lambda1 (*.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 lambda1 (sin.f64 lambda2))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))
(fma.f64 (cos.f64 lambda2) (fma.f64 lambda1 (*.f64 lambda1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 lambda1 (sin.f64 lambda2)))
lambda1
(fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))
(*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))
(cos.f64 lambda2)
lambda2
#s(literal -1/2 binary64)
(sin.f64 lambda2)
R
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 R (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))))
(acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))))
#s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
#s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))
#s(literal -1/2 binary64)
(cos.f64 (+.f64 phi2 phi1))
(+.f64 phi2 phi1)
phi2
phi1
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))
(cos.f64 phi2)
(*.f64 (cos.f64 phi1) (cos.f64 lambda1))
(cos.f64 phi1)
(cos.f64 lambda1)
lambda1
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
#s(literal 1/2 binary64)
(cos.f64 (-.f64 phi2 phi1))
(-.f64 phi2 phi1)
R
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 R (acos.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(acos.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
(*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
(cos.f64 (-.f64 phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(-.f64 phi1 phi2)
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(+.f64 phi1 phi2)
(+.f64 phi2 phi1)
R

localize820.0ms (4.1%)

Memory
21.4MiB live, 1 796.9MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.473812884886998
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
accuracy2.508463760552225
(acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))
accuracy14.314051984535576
(cos.f64 (+.f64 phi1 phi2))
accuracy14.549745234874822
(cos.f64 (-.f64 phi1 phi2))
accuracy2.508463760552225
(acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
accuracy14.314051984535576
(cos.f64 (+.f64 phi2 phi1))
accuracy14.549745234874822
(cos.f64 (-.f64 phi2 phi1))
accuracy28.889331586750203
#s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
accuracy0.21484375
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
accuracy2.508463760552225
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))))
accuracy30.385175815532314
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))
accuracy32.70801056520516
#s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))
accuracy2.508463760552225
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))))
accuracy14.681038471317523
(cos.f64 (-.f64 lambda2 lambda1))
accuracy27.182677679121824
#s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))
accuracy30.385175815532314
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))
accuracy0.171875
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
accuracy0.18359375
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
accuracy0.21484375
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
accuracy2.508463760552225
(acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
Samples
632.0ms251×1valid
3.0ms2valid
3.0ms0valid
Compiler

Compiled 683 to 73 computations (89.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 532.0ms
ival-cos: 198.0ms (37.2% of total)
ival-mult: 95.0ms (17.9% of total)
ival-sin: 78.0ms (14.7% of total)
ival-acos: 69.0ms (13% of total)
adjust: 46.0ms (8.7% of total)
ival-add: 31.0ms (5.8% of total)
ival-sub: 13.0ms (2.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series132.0ms (0.7%)

Memory
-1.4MiB live, 317.3MiB allocated
Counts
28 → 1 176
Calls
Call 1
Inputs
#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())
#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())
#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())
#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())
#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())
#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())
#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())
#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())
#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())
#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())
#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())
#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())
#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())
#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())
#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())
#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())
#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())
Outputs
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) (patch (*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))) (* (cos phi2) (sin lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (* (cos phi2) (sin lambda2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* 1/120 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (* (cos phi2) (sin lambda2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))) (* 1/120 (* (cos phi2) (sin lambda2))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* (cos phi2) (sin lambda1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin lambda1))) (* 1/120 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* (cos phi2) (sin lambda1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin lambda1))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))) (* 1/120 (* (cos phi2) (sin lambda1))))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (sin lambda1) (sin lambda2)))) (* (sin lambda1) (sin lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (sin lambda2))) (* 1/24 (* (pow phi2 2) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (sin lambda1) (sin lambda2)))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (sin lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda1 lambda2))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (neg lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (cos phi2)) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow lambda1 2) (cos lambda2))) (taylor inf lambda1) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow lambda1 2) (cos lambda2))) (taylor -inf lambda1) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (taylor -inf lambda1) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (taylor -inf lambda1) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow lambda1 2))) (taylor 0 lambda2) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 lambda2))) (taylor 0 lambda2) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2)))))) (taylor 0 lambda2) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (+ (* -1/6 (* lambda1 lambda2)) (* 1/4 (pow lambda1 2))) 1/2)))))) (taylor 0 lambda2) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor inf lambda2) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor inf lambda2) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor inf lambda2) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor inf lambda2) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (patch (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda1 lambda2))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos phi1)) (+ (* 1/2 (cos (neg phi1))) (* (cos lambda1) (cos phi1)))) (taylor 0 phi2) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos phi1)) (+ (* 1/2 (cos (neg phi1))) (+ (* phi2 (+ (* -1/2 (sin (neg phi1))) (* 1/2 (sin phi1)))) (* (cos lambda1) (cos phi1))))) (taylor 0 phi2) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos phi1)) (+ (* 1/2 (cos (neg phi1))) (+ (* phi2 (+ (* -1/2 (sin (neg phi1))) (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (+ (* -1/4 (cos (neg phi1))) (* 1/4 (cos phi1)))))))) (* (cos lambda1) (cos phi1))))) (taylor 0 phi2) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos phi1)) (+ (* 1/2 (cos (neg phi1))) (+ (* phi2 (+ (* -1/2 (sin (neg phi1))) (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (+ (* -1/4 (cos (neg phi1))) (+ (* 1/4 (cos phi1)) (* phi2 (+ (* -1/12 (sin phi1)) (* 1/12 (sin (neg phi1)))))))))))) (* (cos lambda1) (cos phi1))))) (taylor 0 phi2) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor inf phi2) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor inf phi2) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor inf phi2) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor inf phi2) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (- phi1 (* -1 phi2)))) (+ (* 1/2 (cos (neg (+ phi1 (* -1 phi2))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor -inf phi2) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (- phi1 (* -1 phi2)))) (+ (* 1/2 (cos (neg (+ phi1 (* -1 phi2))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor -inf phi2) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (- phi1 (* -1 phi2)))) (+ (* 1/2 (cos (neg (+ phi1 (* -1 phi2))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor -inf phi2) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (- phi1 (* -1 phi2)))) (+ (* 1/2 (cos (neg (+ phi1 (* -1 phi2))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor -inf phi2) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos phi2)) (+ (* 1/2 (cos phi2)) (* (cos lambda1) (cos phi2)))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos phi2)) (+ (* 1/2 (cos phi2)) (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos phi2)) (+ (* 1/2 (cos phi2)) (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (+ (* -1/4 (cos phi2)) (* 1/4 (cos phi2))))))) (* (cos lambda1) (cos phi2))))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos phi2)) (+ (* 1/2 (cos phi2)) (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (+ (* -1/4 (cos phi2)) (+ (* -1/6 (* phi1 (sin phi2))) (* 1/4 (cos phi2)))))))) (* (cos lambda1) (cos phi2))))) (taylor 0 phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (- phi2 (* -1 phi1)))) (+ (* 1/2 (cos (+ phi2 (* -1 phi1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (- phi2 (* -1 phi1)))) (+ (* 1/2 (cos (+ phi2 (* -1 phi1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (- phi2 (* -1 phi1)))) (+ (* 1/2 (cos (+ phi2 (* -1 phi1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (- phi2 (* -1 phi1)))) (+ (* 1/2 (cos (+ phi2 (* -1 phi1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor -inf phi1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos phi1) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* -1/2 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos phi1) (cos phi2))))) (taylor 0 lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (+ (* (cos phi1) (cos phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda1 2) (* (cos phi1) (cos phi2))))))))) (taylor 0 lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (+ (* (cos phi1) (cos phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2)))))))))) (taylor 0 lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor inf lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor inf lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor inf lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor inf lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor -inf lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor -inf lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor -inf lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor -inf lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (* -1/2 (sin (neg phi2))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/4 (cos (neg phi2)))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* -1/4 (cos (neg phi2))) (* phi1 (- (* 1/12 (sin (neg phi2))) (* 1/12 (sin phi2)))))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (- (* 1/2 (sin phi1)) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (- (+ (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (sin phi1))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (- (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* phi2 (- (* -1/12 (sin phi1)) (* 1/12 (sin phi1))))))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (* -1/2 (sin (neg phi2))) (* -1/2 (sin phi2)))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/4 (cos (neg phi2)))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* phi1 (- (* 1/12 (sin (neg phi2))) (* 1/12 (sin phi2)))))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (- (* 1/2 (sin phi1)) (* -1/2 (sin phi1)))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (- (+ (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (sin phi1))) (* -1/2 (sin phi1)))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (- (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* phi2 (- (* -1/12 (sin phi1)) (* 1/12 (sin phi1))))))) (* -1/2 (sin phi1)))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* phi1 (sin (neg phi2)))) (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/4 (cos (neg phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2))))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos phi1)) (+ (* 1/2 (* phi2 (sin phi1))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos phi1)) (+ (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/4 (cos phi1)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos phi1)) (+ (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (sin lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (cos phi2))) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/24 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2)))))))) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (cos phi1))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* 1/24 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (cos phi1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi1) (cos phi2))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/24 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/24 (* (cos lambda1) (* (cos phi1) (cos phi2))))))))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/24 (* (cos lambda2) (* (cos phi1) (cos phi2))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (patch (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda1)) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) (patch #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg phi1)) (taylor 0 phi2) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1))))) (taylor 0 phi2) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1))))) (taylor 0 phi2) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1))))) (taylor 0 phi2) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 phi1)) (taylor inf phi2) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 phi1)) (taylor inf phi2) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 phi1)) (taylor inf phi2) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 phi1)) (taylor inf phi2) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor 0 phi1) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi2) (* phi1 (sin phi2))) (taylor 0 phi1) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 phi1)) (taylor inf phi1) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 phi1)) (taylor inf phi1) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 phi1)) (taylor inf phi1) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 phi1)) (taylor inf phi1) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (-.f64 phi2 phi1)) (patch (cos.f64 (-.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos phi1) (taylor 0 phi2) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* -1 (* phi2 (sin phi1)))) (taylor 0 phi2) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1)))) (taylor 0 phi2) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1)))) (taylor 0 phi2) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi2) (* -1 (* phi1 (sin phi2)))) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2)))) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2)))) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi2 phi1)) (patch (cos.f64 (+.f64 phi2 phi1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg phi2)) (taylor 0 phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<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 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 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 (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos phi1) (taylor 0 phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (sin phi1))) (taylor 0 phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1))))) (taylor 0 phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 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 (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (-.f64 phi1 phi2)) (patch (cos.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi2) (* -1 (* phi1 (sin phi2)))) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2)))) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2)))) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos phi1) (taylor 0 phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* -1 (* phi2 (sin phi1)))) (taylor 0 phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1)))) (taylor 0 phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1)))) (taylor 0 phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
Calls

294 calls:

TimeVariablePointExpression
3.0ms
lambda2
@0
(+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2))
2.0ms
lambda1
@inf
(- (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2))
1.0ms
lambda2
@-inf
(+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2))
1.0ms
lambda1
@inf
(+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1)))))
1.0ms
phi2
@-inf
(+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1)))))

simplify376.0ms (1.9%)

Memory
8.1MiB live, 920.8MiB allocated
Algorithm
egg-herbie
Rules
11 024×lower-fma.f64
11 024×lower-fma.f32
6 264×lower-+.f64
6 264×lower-+.f32
5 090×lower-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
086325406
1290824966
2622124880
0851623064
Stop Event
iter limit
node limit
Counts
1 176 → 1 176
Calls
Call 1
Inputs
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* lambda1 (* (cos phi2) (sin lambda2)))
(* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))) (* (cos phi2) (sin lambda2))))
(* lambda1 (+ (* (cos phi2) (sin lambda2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* 1/120 (* (pow lambda1 2) (* (cos phi2) (sin lambda2))))))))
(* lambda1 (+ (* (cos phi2) (sin lambda2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))) (* 1/120 (* (cos phi2) (sin lambda2)))))))))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* lambda2 (* (cos phi2) (sin lambda1)))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))) (* (cos phi2) (sin lambda1))))
(* lambda2 (+ (* (cos phi2) (sin lambda1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin lambda1))) (* 1/120 (* (pow lambda2 2) (* (cos phi2) (sin lambda1))))))))
(* lambda2 (+ (* (cos phi2) (sin lambda1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin lambda1))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))) (* 1/120 (* (cos phi2) (sin lambda1)))))))))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (sin lambda1) (sin lambda2))
(+ (* -1/2 (* (pow phi2 2) (* (sin lambda1) (sin lambda2)))) (* (sin lambda1) (sin lambda2)))
(+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (sin lambda2))) (* 1/24 (* (pow phi2 2) (* (sin lambda1) (sin lambda2)))))))
(+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (sin lambda1) (sin lambda2))))))))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(cos (- lambda2 lambda1))
(+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1)))))
(+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1)))))))
(+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (neg lambda1)))
(+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(* (cos lambda2) (cos phi2))
(+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(* -1/2 (* (pow lambda1 2) (cos lambda2)))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))
(* -1/2 (* (pow lambda1 2) (cos lambda2)))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))
(+ 1 (* -1/2 (pow lambda1 2)))
(+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 lambda2)))
(+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))
(+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (+ (* -1/6 (* lambda1 lambda2)) (* 1/4 (pow lambda1 2))) 1/2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* -1/2 (cos phi1)) (+ (* 1/2 (cos (neg phi1))) (* (cos lambda1) (cos phi1))))
(+ (* -1/2 (cos phi1)) (+ (* 1/2 (cos (neg phi1))) (+ (* phi2 (+ (* -1/2 (sin (neg phi1))) (* 1/2 (sin phi1)))) (* (cos lambda1) (cos phi1)))))
(+ (* -1/2 (cos phi1)) (+ (* 1/2 (cos (neg phi1))) (+ (* phi2 (+ (* -1/2 (sin (neg phi1))) (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (+ (* -1/4 (cos (neg phi1))) (* 1/4 (cos phi1)))))))) (* (cos lambda1) (cos phi1)))))
(+ (* -1/2 (cos phi1)) (+ (* 1/2 (cos (neg phi1))) (+ (* phi2 (+ (* -1/2 (sin (neg phi1))) (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (+ (* -1/4 (cos (neg phi1))) (+ (* 1/4 (cos phi1)) (* phi2 (+ (* -1/12 (sin phi1)) (* 1/12 (sin (neg phi1)))))))))))) (* (cos lambda1) (cos phi1)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (- phi1 (* -1 phi2)))) (+ (* 1/2 (cos (neg (+ phi1 (* -1 phi2))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (- phi1 (* -1 phi2)))) (+ (* 1/2 (cos (neg (+ phi1 (* -1 phi2))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (- phi1 (* -1 phi2)))) (+ (* 1/2 (cos (neg (+ phi1 (* -1 phi2))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (- phi1 (* -1 phi2)))) (+ (* 1/2 (cos (neg (+ phi1 (* -1 phi2))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos phi2)) (+ (* 1/2 (cos phi2)) (* (cos lambda1) (cos phi2))))
(+ (* -1/2 (cos phi2)) (+ (* 1/2 (cos phi2)) (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2)))))
(+ (* -1/2 (cos phi2)) (+ (* 1/2 (cos phi2)) (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (+ (* -1/4 (cos phi2)) (* 1/4 (cos phi2))))))) (* (cos lambda1) (cos phi2)))))
(+ (* -1/2 (cos phi2)) (+ (* 1/2 (cos phi2)) (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (+ (* -1/4 (cos phi2)) (+ (* -1/6 (* phi1 (sin phi2))) (* 1/4 (cos phi2)))))))) (* (cos lambda1) (cos phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (- phi2 (* -1 phi1)))) (+ (* 1/2 (cos (+ phi2 (* -1 phi1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (- phi2 (* -1 phi1)))) (+ (* 1/2 (cos (+ phi2 (* -1 phi1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (- phi2 (* -1 phi1)))) (+ (* 1/2 (cos (+ phi2 (* -1 phi1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (- phi2 (* -1 phi1)))) (+ (* 1/2 (cos (+ phi2 (* -1 phi1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos phi1) (cos phi2))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* -1/2 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (+ (* (cos phi1) (cos phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))))))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (+ (* (cos phi1) (cos phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2))))))))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(- (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (* -1/2 (sin (neg phi2))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/4 (cos (neg phi2)))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* -1/4 (cos (neg phi2))) (* phi1 (- (* 1/12 (sin (neg phi2))) (* 1/12 (sin phi2)))))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (- (* 1/2 (sin phi1)) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (- (+ (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (sin phi1))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (- (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* phi2 (- (* -1/12 (sin phi1)) (* 1/12 (sin phi1))))))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (* -1/2 (sin (neg phi2))) (* -1/2 (sin phi2)))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/4 (cos (neg phi2)))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* phi1 (- (* 1/12 (sin (neg phi2))) (* 1/12 (sin phi2)))))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (- (* 1/2 (sin phi1)) (* -1/2 (sin phi1)))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (- (+ (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (sin phi1))) (* -1/2 (sin phi1)))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (- (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* phi2 (- (* -1/12 (sin phi1)) (* 1/12 (sin phi1))))))) (* -1/2 (sin phi1)))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* -1/2 (* phi1 (sin (neg phi2)))) (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/4 (cos (neg phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2))))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* 1/2 (cos phi1)) (+ (* 1/2 (* phi2 (sin phi1))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos phi1)) (+ (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/4 (cos phi1)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos phi1)) (+ (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* lambda1 (sin lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* lambda2 (sin lambda1))
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (cos lambda1) (* (cos lambda2) (cos phi2)))
(+ (* -1/2 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/24 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi2)))))))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (cos phi1)))
(+ (* -1/2 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* 1/24 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi1)))))))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(+ (* -1/2 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/24 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/24 (* (cos lambda1) (* (cos phi1) (cos phi2)))))))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(+ (* -1/2 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/24 (* (cos lambda2) (* (cos phi1) (cos phi2)))))))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (neg phi1))
(+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))
(+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos (neg (+ phi1 (* -1 phi2))))
(cos phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (- phi2 phi1))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos (+ phi2 (* -1 phi1)))
(cos phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (neg phi2))
(+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2)))))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (neg (+ phi2 (* -1 phi1))))
(cos (neg (+ phi2 (* -1 phi1))))
(cos (neg (+ phi2 (* -1 phi1))))
(cos (neg (+ phi2 (* -1 phi1))))
(cos phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1)))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1)))))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
Outputs
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 lambda2) lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi2 (fma.f64 phi2 (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 phi1 (sin.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi1 (fma.f64 phi1 (*.f64 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* lambda1 (* (cos phi2) (sin lambda2)))
(*.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2))
(* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))) (* (cos phi2) (sin lambda2))))
(*.f64 lambda1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))))
(* lambda1 (+ (* (cos phi2) (sin lambda2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* 1/120 (* (pow lambda1 2) (* (cos phi2) (sin lambda2))))))))
(*.f64 lambda1 (fma.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))))
(* lambda1 (+ (* (cos phi2) (sin lambda2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))) (* 1/120 (* (cos phi2) (sin lambda2)))))))))
(*.f64 lambda1 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* lambda2 (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))) (* (cos phi2) (sin lambda1))))
(*.f64 lambda2 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
(* lambda2 (+ (* (cos phi2) (sin lambda1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin lambda1))) (* 1/120 (* (pow lambda2 2) (* (cos phi2) (sin lambda1))))))))
(*.f64 lambda2 (fma.f64 (*.f64 lambda2 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
(* lambda2 (+ (* (cos phi2) (sin lambda1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin lambda1))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))) (* 1/120 (* (cos phi2) (sin lambda1)))))))))
(*.f64 lambda2 (fma.f64 (*.f64 lambda2 lambda2) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64))))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(+ (* -1/2 (* (pow phi2 2) (* (sin lambda1) (sin lambda2)))) (* (sin lambda1) (sin lambda2)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (sin lambda2))) (* 1/24 (* (pow phi2 2) (* (sin lambda1) (sin lambda2)))))))
(fma.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (sin lambda1) (sin lambda2))))))))
(fma.f64 (*.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 phi1 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (sin.f64 phi2)))) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) phi2) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1)))) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 lambda2) lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (neg.f64 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1)))))))
(fma.f64 (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))
(fma.f64 (*.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (neg lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 lambda1))
(+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda1))))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos lambda2) (cos phi2))
(*.f64 (cos.f64 lambda2) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (*.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(fma.f64 lambda1 (fma.f64 (cos.f64 phi2) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) (cos.f64 lambda2))
(* -1/2 (* (pow lambda1 2) (cos lambda2)))
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))
(*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (sin.f64 lambda2) lambda1)))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (sin.f64 lambda2) lambda1)) (/.f64 (cos.f64 lambda2) (*.f64 lambda1 lambda1))))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (sin.f64 lambda2) lambda1)) (/.f64 (cos.f64 lambda2) (*.f64 lambda1 lambda1))))
(* -1/2 (* (pow lambda1 2) (cos lambda2)))
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))
(*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (sin.f64 lambda2) lambda1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))
(*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))
(*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))
(+ 1 (* -1/2 (pow lambda1 2)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 lambda2)))
(fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))
(+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/4 binary64) #s(literal -1/2 binary64)) lambda1) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))
(+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (+ (* -1/6 (* lambda1 lambda2)) (* 1/4 (pow lambda1 2))) 1/2))))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/4 binary64) #s(literal -1/2 binary64))) lambda1) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) (cos.f64 lambda2))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 phi1 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (sin.f64 phi2)))) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) phi2) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1)))) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 lambda2) lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (neg.f64 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* -1/2 (cos phi1)) (+ (* 1/2 (cos (neg phi1))) (* (cos lambda1) (cos phi1))))
(+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))
(+ (* -1/2 (cos phi1)) (+ (* 1/2 (cos (neg phi1))) (+ (* phi2 (+ (* -1/2 (sin (neg phi1))) (* 1/2 (sin phi1)))) (* (cos lambda1) (cos phi1)))))
(fma.f64 (cos.f64 phi1) (cos.f64 lambda1) (*.f64 phi2 (sin.f64 phi1)))
(+ (* -1/2 (cos phi1)) (+ (* 1/2 (cos (neg phi1))) (+ (* phi2 (+ (* -1/2 (sin (neg phi1))) (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (+ (* -1/4 (cos (neg phi1))) (* 1/4 (cos phi1)))))))) (* (cos lambda1) (cos phi1)))))
(+.f64 #s(literal 0 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 0 binary64)) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))))
(+ (* -1/2 (cos phi1)) (+ (* 1/2 (cos (neg phi1))) (+ (* phi2 (+ (* -1/2 (sin (neg phi1))) (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (+ (* -1/4 (cos (neg phi1))) (+ (* 1/4 (cos phi1)) (* phi2 (+ (* -1/12 (sin phi1)) (* 1/12 (sin (neg phi1)))))))))))) (* (cos lambda1) (cos phi1)))))
(+.f64 #s(literal 0 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) (fma.f64 phi2 (*.f64 (sin.f64 phi1) #s(literal -1/6 binary64)) #s(literal 0 binary64))) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (- phi1 (* -1 phi2)))) (+ (* 1/2 (cos (neg (+ phi1 (* -1 phi2))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (- phi1 (* -1 phi2)))) (+ (* 1/2 (cos (neg (+ phi1 (* -1 phi2))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (- phi1 (* -1 phi2)))) (+ (* 1/2 (cos (neg (+ phi1 (* -1 phi2))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (- phi1 (* -1 phi2)))) (+ (* 1/2 (cos (neg (+ phi1 (* -1 phi2))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos phi2)) (+ (* 1/2 (cos phi2)) (* (cos lambda1) (cos phi2))))
(*.f64 (cos.f64 phi2) (cos.f64 lambda1))
(+ (* -1/2 (cos phi2)) (+ (* 1/2 (cos phi2)) (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2)))))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))
(+ (* -1/2 (cos phi2)) (+ (* 1/2 (cos phi2)) (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (+ (* -1/4 (cos phi2)) (* 1/4 (cos phi2))))))) (* (cos lambda1) (cos phi2)))))
(fma.f64 phi1 (fma.f64 phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))
(+ (* -1/2 (cos phi2)) (+ (* 1/2 (cos phi2)) (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (+ (* -1/4 (cos phi2)) (+ (* -1/6 (* phi1 (sin phi2))) (* 1/4 (cos phi2)))))))) (* (cos lambda1) (cos phi2)))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (sin.f64 phi2)))) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (- phi2 (* -1 phi1)))) (+ (* 1/2 (cos (+ phi2 (* -1 phi1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (- phi2 (* -1 phi1)))) (+ (* 1/2 (cos (+ phi2 (* -1 phi1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (- phi2 (* -1 phi1)))) (+ (* 1/2 (cos (+ phi2 (* -1 phi1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (- phi2 (* -1 phi1)))) (+ (* 1/2 (cos (+ phi2 (* -1 phi1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos phi1) (cos phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* -1/2 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos phi1) (cos phi2)))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (+ (* (cos phi1) (cos phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (+ (* (cos phi1) (cos phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2))))))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda1 lambda1) #s(literal 1/24 binary64))) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64)) (cos.f64 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ (* -1/2 (cos (+ phi1 phi2))) (+ (* 1/2 (cos (- phi2 phi1))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (* -1/2 (sin (neg phi2))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(+.f64 (fma.f64 phi1 (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/4 (cos (neg phi2)))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(+.f64 (fma.f64 phi1 (fma.f64 phi1 (*.f64 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* -1/4 (cos (neg phi2))) (* phi1 (- (* 1/12 (sin (neg phi2))) (* 1/12 (sin phi2)))))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(+.f64 (fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (*.f64 #s(literal 1/12 binary64) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* phi2 (- (* 1/2 (sin phi1)) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (- (+ (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (sin phi1))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) phi2) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi2 (- (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* phi2 (- (* -1/12 (sin phi1)) (* 1/12 (sin phi1))))))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 phi2 (*.f64 (sin.f64 phi1) #s(literal -1/6 binary64)) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 lambda2) lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (neg.f64 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/2 (cos phi2)))
(fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (* -1/2 (sin (neg phi2))) (* -1/2 (sin phi2)))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos phi2)))
(+.f64 (fma.f64 phi1 (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/4 (cos (neg phi2)))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos phi2)))
(+.f64 (fma.f64 phi1 (fma.f64 phi1 (*.f64 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* phi1 (- (* 1/12 (sin (neg phi2))) (* 1/12 (sin phi2)))))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos phi2)))
(+.f64 (fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (*.f64 phi1 (*.f64 #s(literal 1/12 binary64) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+ (* phi2 (- (* 1/2 (sin phi1)) (* -1/2 (sin phi1)))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (- (+ (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (sin phi1))) (* -1/2 (sin phi1)))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* phi2 (- (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* phi2 (- (* -1/12 (sin phi1)) (* 1/12 (sin phi1))))))) (* -1/2 (sin phi1)))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 phi2 (*.f64 (sin.f64 phi1) #s(literal -1/6 binary64)) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (fma.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 lambda2) lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* -1/2 (* phi1 (sin (neg phi2)))) (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (neg.f64 (*.f64 (*.f64 phi1 (sin.f64 phi2)) #s(literal -1/2 binary64))))
(+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/4 (cos (neg phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 (cos.f64 phi2) #s(literal -1/4 binary64) (*.f64 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) (*.f64 (sin.f64 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2))))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 phi1 (fma.f64 phi1 (-.f64 (fma.f64 (cos.f64 phi2) #s(literal -1/4 binary64) (*.f64 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) (*.f64 (*.f64 #s(literal 1/12 binary64) phi1) (sin.f64 phi2))) (*.f64 (sin.f64 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(+ (* 1/2 (cos phi1)) (+ (* 1/2 (* phi2 (sin phi1))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal 1/2 binary64)))
(+ (* 1/2 (cos phi1)) (+ (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/4 (cos phi1)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (*.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))
(+ (* 1/2 (cos phi1)) (+ (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (*.f64 phi2 (fma.f64 phi2 (fma.f64 (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal -1/12 binary64)))) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(fma.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 lambda2) lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(*.f64 lambda1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (sin.f64 lambda2)))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(*.f64 lambda1 (fma.f64 (*.f64 lambda1 lambda1) (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (sin.f64 lambda2)))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(*.f64 lambda1 (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 (sin.f64 lambda2) #s(literal -1/6 binary64))) (sin.f64 lambda2)))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* lambda2 (sin lambda1))
(*.f64 lambda2 (sin.f64 lambda1))
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(*.f64 lambda2 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (sin.f64 lambda1)))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(*.f64 lambda2 (fma.f64 (*.f64 lambda2 lambda2) (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (sin.f64 lambda1)))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(*.f64 lambda2 (fma.f64 (*.f64 lambda2 lambda2) (fma.f64 (*.f64 lambda2 lambda2) (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64))) (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda1))) (sin.f64 lambda1)))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(* (cos lambda1) (* (cos lambda2) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(+ (* -1/2 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/24 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))
(fma.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi2)))))))))
(fma.f64 (*.f64 phi1 phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (cos phi1)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* -1/2 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* 1/24 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64)))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi1)))))))))
(fma.f64 (*.f64 phi2 phi2) (fma.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))
(+ (* -1/2 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/24 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
(fma.f64 (*.f64 lambda2 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda2 lambda2) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/24 (* (cos lambda1) (* (cos phi1) (cos phi2)))))))))
(fma.f64 (*.f64 lambda2 lambda2) (fma.f64 (*.f64 lambda2 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2) #s(literal 1/24 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* -1/2 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))))))
(fma.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/24 (* (cos lambda2) (* (cos phi1) (cos phi2)))))))))
(fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal -1/2 binary64) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda1 lambda1) #s(literal 1/24 binary64))))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (neg.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (sin.f64 lambda1))))) (sin.f64 lambda1)) (cos.f64 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (sin.f64 lambda2)) (cos.f64 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (neg.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (sin.f64 lambda1))))) (sin.f64 lambda1)) (cos.f64 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (sin.f64 lambda2)) (cos.f64 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg phi1))
(cos.f64 phi1)
(+ (cos (neg phi1)) (* -1 (* phi2 (sin (neg phi1)))))
(fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))
(+ (cos (neg phi1)) (* phi2 (- (* -1/2 (* phi2 (cos (neg phi1)))) (sin (neg phi1)))))
(fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))
(+ (cos (neg phi1)) (* phi2 (- (* phi2 (+ (* -1/2 (cos (neg phi1))) (* 1/6 (* phi2 (sin (neg phi1)))))) (sin (neg phi1)))))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/2 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1)))) (sin.f64 phi1)) (cos.f64 phi1))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(cos (neg (+ phi1 (* -1 phi2))))
(cos.f64 (-.f64 phi1 phi2))
(cos (neg (+ phi1 (* -1 phi2))))
(cos.f64 (-.f64 phi1 phi2))
(cos (neg (+ phi1 (* -1 phi2))))
(cos.f64 (-.f64 phi1 phi2))
(cos (neg (+ phi1 (* -1 phi2))))
(cos.f64 (-.f64 phi1 phi2))
(cos phi2)
(cos.f64 phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (* -1 (sin phi2)))))
(fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))) (* -1 (sin phi2)))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 (cos.f64 phi2) #s(literal -1/2 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (sin.f64 phi2)))) (sin.f64 phi2)) (cos.f64 phi2))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi2 (* -1 phi1)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi2 (* -1 phi1)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi2 (* -1 phi1)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi2 (* -1 phi1)))
(cos.f64 (-.f64 phi1 phi2))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(-.f64 (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(fma.f64 phi2 (-.f64 (*.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))))) (sin phi1))))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/2 binary64) (*.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal 1/6 binary64))) (sin.f64 (neg.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 phi2)
(cos.f64 phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(-.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(fma.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(fma.f64 phi1 (-.f64 (*.f64 phi1 (fma.f64 (*.f64 phi1 (sin.f64 phi2)) #s(literal 1/6 binary64) (*.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 (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos (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 (cos.f64 phi2) #s(literal -1/2 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (sin.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 (neg (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos (neg (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos (neg (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos (neg (+ 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 (cos.f64 phi1) #s(literal -1/2 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 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 phi2)
(cos.f64 phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(-.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(fma.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(fma.f64 phi1 (-.f64 (*.f64 phi1 (fma.f64 (*.f64 phi1 (sin.f64 phi2)) #s(literal 1/6 binary64) (*.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 (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(-.f64 (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(fma.f64 phi2 (-.f64 (*.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))))) (sin phi1))))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/2 binary64) (*.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal 1/6 binary64))) (sin.f64 (neg.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))

rewrite425.0ms (2.1%)

Memory
19.4MiB live, 1 011.9MiB allocated
Rules
7 918×lower-*.f32
7 884×lower-*.f64
6 482×lower-fma.f32
6 466×lower-fma.f64
3 946×lower-/.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
084648
0142621
1494582
23421582
011379563
Stop Event
iter limit
node limit
iter limit
Counts
28 → 663
Calls
Call 1
Inputs
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
(acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))
#s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
#s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
#s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))
(cos.f64 (-.f64 phi2 phi1))
(cos.f64 (+.f64 phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
Outputs
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) (cos.f64 lambda2) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
(fma.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (cos.f64 lambda1) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.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) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64))))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) (-.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 #s(literal 4 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))))) (*.f64 #s(literal 4 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))) #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) #s(literal 4 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))) #s(literal 2 binary64) (*.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))) #s(literal 2 binary64) (*.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))) #s(literal 4 binary64) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 4 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))) #s(literal 2 binary64) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))) #s(literal 2 binary64) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) #s(literal 4 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #s(literal 4 binary64)))
(/.f64 (fma.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)))) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)))) #s(literal 4 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)))) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 4 binary64) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))) #s(literal 4 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)))) #s(literal 4 binary64) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) #s(literal 4 binary64)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)))) #s(literal 2 binary64) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)))) #s(literal 2 binary64) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) #s(literal 2 binary64)))
(/.f64 (fma.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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))) #s(literal 4 binary64) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #s(literal 4 binary64)))
(/.f64 (fma.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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))) #s(literal 2 binary64) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #s(literal 2 binary64)))
(/.f64 (fma.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)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))) #s(literal 2 binary64) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) #s(literal 4 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 4 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) #s(literal -2 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))) #s(literal -2 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64) (*.f64 (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) #s(literal -2 binary64)))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64)) #s(literal -2 binary64)))
(/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1))))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1))))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2)))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #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 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 1 binary64))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #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 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))) #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 1 binary64))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))) #s(literal -2 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 1 binary64))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal -2 binary64) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 1 binary64))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal -2 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) (cos.f64 phi1)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) (cos.f64 phi1)) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) (cos.f64 phi1)) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1))))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))) (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) (cos.f64 phi1)))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)))) #s(literal 4 binary64))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64))))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1))))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) (cos.f64 phi1)))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))) (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))))) (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 #s(literal -2 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1))))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))) (*.f64 #s(literal -2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))))) (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 #s(literal -2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 #s(literal -2 binary64) (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) (cos.f64 phi1)))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (*.f64 #s(literal 4 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 #s(literal 4 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))))) (*.f64 #s(literal 4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 #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) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)))) #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))) #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (*.f64 #s(literal 4 binary64) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4 binary64) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (*.f64 #s(literal 4 binary64) (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) #s(literal 4 binary64) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 4 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) #s(literal 2 binary64) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) #s(literal 2 binary64) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) #s(literal 4 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 4 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 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) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #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) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #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) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(*.f64 (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (*.f64 (cos.f64 phi2) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)))
(*.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))
(*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2))
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))))
(+.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) (cos.f64 lambda2))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))
(+.f64 (+.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (*.f64 lambda1 lambda1))) (*.f64 lambda1 (sin.f64 lambda2)))
(-.f64 (/.f64 (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) (cos.f64 lambda2))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) (cos.f64 lambda2))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))
(fma.f64 lambda1 (*.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (*.f64 lambda1 lambda1) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))
(fma.f64 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(fma.f64 (*.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) lambda1 (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))
(fma.f64 (*.f64 lambda1 lambda1) (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))
(fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) lambda1) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))
(fma.f64 (*.f64 lambda1 (*.f64 lambda1 (cos.f64 lambda2))) #s(literal -1/2 binary64) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))
(/.f64 (+.f64 (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (fma.f64 (cos.f64 lambda2) (-.f64 (cos.f64 lambda2) (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)))) (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 2 binary64)) (*.f64 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2))))) (-.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) (cos.f64 lambda2)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 lambda2) (-.f64 (cos.f64 lambda2) (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)))) (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) (cos.f64 lambda2)) (-.f64 (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 lambda2) (-.f64 (cos.f64 lambda2) (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)))) (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))))) (neg.f64 (-.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) (cos.f64 lambda2))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 2 binary64))) (-.f64 (cos.f64 lambda2) (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)))))
(pow.f64 (/.f64 (fma.f64 (cos.f64 lambda2) (-.f64 (cos.f64 lambda2) (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)))) (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) (cos.f64 lambda2)) (-.f64 (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda2) (-.f64 (cos.f64 lambda2) (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)))) (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2))) (cos.f64 lambda2))))
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))
(+.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(+.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))))
(-.f64 (/.f64 (*.f64 (+.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/4 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(fma.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) (-.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.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/4 binary64))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.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 phi2 phi1))))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) (-.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.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/4 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.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 phi2 phi1))))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) (-.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.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/4 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) (+.f64 phi2 phi1))))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) #s(literal 1/4 binary64))) (-.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64))) (-.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (+.f64 lambda1 phi1)) (cos.f64 (-.f64 phi1 lambda1)))) (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (+.f64 lambda1 phi1)) (cos.f64 (-.f64 phi1 lambda1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64)) (*.f64 (+.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/4 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 lambda1)) (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 lambda1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64)) (*.f64 (+.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/4 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda1 phi1)) (cos.f64 (-.f64 phi1 lambda1))) (cos.f64 phi2)) (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda1 phi1)) (cos.f64 (-.f64 phi1 lambda1))) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64)) (*.f64 (+.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/4 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) (-.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.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/4 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.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 phi2 phi1))))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) (-.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.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/4 binary64)))))
(*.f64 (-.f64 (*.f64 (+.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/4 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))))
(*.f64 R (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))))
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))) R)
(acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))))))
#s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(-.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))) (/.f64 (*.f64 (+.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/4 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi2 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) #s(literal 1/4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) #s(literal 1/4 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) #s(literal 1/4 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) #s(literal 1/4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #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 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64)) (*.f64 (+.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/4 binary64))))) (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))) (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.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 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (+.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/4 binary64)) (*.f64 (+.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/4 binary64))))) (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.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 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (*.f64 (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64)) (*.f64 (+.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/4 binary64))))) (*.f64 (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.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 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (*.f64 (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64)) (*.f64 (+.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/4 binary64))))) (*.f64 (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1))))) (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64)) (*.f64 (+.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/4 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2)))) (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64)) (*.f64 (+.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/4 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #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 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64)) (*.f64 (+.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/4 binary64))))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))) (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.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 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (-.f64 (*.f64 (+.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/4 binary64)) (*.f64 (+.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/4 binary64))))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.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 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64)) (*.f64 (+.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/4 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64)) (*.f64 (+.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/4 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64)) (*.f64 (+.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/4 binary64))))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (-.f64 (*.f64 (+.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/4 binary64)) (*.f64 (+.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/4 binary64))))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) (cos.f64 phi1)) (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64)) (*.f64 (+.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/4 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)) (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64)) (*.f64 (+.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/4 binary64))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (*.f64 (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))) (*.f64 (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))))) (*.f64 (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #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 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.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 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #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 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.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 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #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 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1))))))) (*.f64 (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #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 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2)))))) (*.f64 (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))) (*.f64 (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))))) (*.f64 (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #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 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.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 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #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 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #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 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) (cos.f64 phi1)))) (*.f64 (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #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 phi2 phi1))))) #s(literal 1/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)))) (*.f64 (fma.f64 (+.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/4 binary64) (fma.f64 (+.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/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (*.f64 (+.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/4 binary64)) (*.f64 (+.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/4 binary64))) (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))))
(/.f64 (fma.f64 (-.f64 (*.f64 (+.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/4 binary64)) (*.f64 (+.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/4 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (fma.f64 (-.f64 (*.f64 (+.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/4 binary64)) (*.f64 (+.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/4 binary64))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 (*.f64 (+.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/4 binary64)) (*.f64 (+.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/4 binary64))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 (*.f64 (+.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/4 binary64)) (*.f64 (+.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/4 binary64))) #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1))))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (*.f64 (+.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/4 binary64)) (*.f64 (+.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/4 binary64))) #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (*.f64 (+.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/4 binary64)) (*.f64 (+.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/4 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (-.f64 (*.f64 (+.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/4 binary64)) (*.f64 (+.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/4 binary64))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(/.f64 (fma.f64 (-.f64 (*.f64 (+.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/4 binary64)) (*.f64 (+.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/4 binary64))) #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (*.f64 (+.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/4 binary64)) (*.f64 (+.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/4 binary64))) #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (*.f64 (+.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/4 binary64)) (*.f64 (+.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/4 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (-.f64 (*.f64 (+.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/4 binary64)) (*.f64 (+.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/4 binary64))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(/.f64 (fma.f64 (-.f64 (*.f64 (+.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/4 binary64)) (*.f64 (+.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/4 binary64))) #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) (cos.f64 phi1)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (*.f64 (+.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/4 binary64)) (*.f64 (+.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/4 binary64))) #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) #s(literal 1/4 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(*.f64 (acos.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
(acos.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.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 phi2 phi1))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(fma.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #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 phi2 phi1))))) #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.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 phi2 phi1))))) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -1 binary64))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 4 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) (cos.f64 lambda2))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))
(*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (cos.f64 lambda1))
(*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.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)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 (neg.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))))
(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)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal -4 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal -4 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 4 binary64))
(pow.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #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 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
#s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 phi2 (*.f64 phi1 (+.f64 phi2 phi1))))) (cos.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 phi2 (*.f64 phi1 (+.f64 phi2 phi1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 phi2 (*.f64 phi1 (+.f64 phi2 phi1))))) (sin.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 phi2 (*.f64 phi1 (+.f64 phi2 phi1)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 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)))))
(+.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))))))
(cos.f64 (-.f64 phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 (neg.f64 phi1))))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 phi2))))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (neg.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 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 phi2 (*.f64 phi1 (+.f64 phi2 phi1))))) (cos.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 phi2 (*.f64 phi1 (+.f64 phi2 phi1))))) (*.f64 (sin.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 phi2 (*.f64 phi1 (+.f64 phi2 phi1))))) (sin.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 phi2 (*.f64 phi1 (+.f64 phi2 phi1)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 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)))))
(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))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (cos.f64 (+.f64 phi2 phi1)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 4 binary64))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 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)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi2 phi1)))) (*.f64 (sin.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi2 phi1)))))
(cos.f64 (+.f64 phi2 phi1))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 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)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi2 phi1)))))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (cos.f64 (-.f64 phi2 phi1)))
(/.f64 (-.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal -2 binary64))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 phi2 (*.f64 phi1 (+.f64 phi2 phi1))))) (cos.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 phi2 (*.f64 phi1 (+.f64 phi2 phi1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 phi2 (*.f64 phi1 (+.f64 phi2 phi1))))) (sin.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 phi2 (*.f64 phi1 (+.f64 phi2 phi1)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 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)))))
(+.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))))))
(cos.f64 (-.f64 phi2 phi1))
(cos.f64 (-.f64 phi1 phi2))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 (neg.f64 phi1))))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 phi2))))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (neg.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 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 phi2 (*.f64 phi1 (+.f64 phi2 phi1))))) (cos.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 phi2 (*.f64 phi1 (+.f64 phi2 phi1))))) (*.f64 (sin.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 phi2 (*.f64 phi1 (+.f64 phi2 phi1))))) (sin.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 phi2 (*.f64 phi1 (+.f64 phi2 phi1)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 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)))))
(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))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (cos.f64 (+.f64 phi2 phi1)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64)))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 4 binary64))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 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)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi2 phi1)))) (*.f64 (sin.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi2 phi1)))))
(cos.f64 (+.f64 phi2 phi1))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 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)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi2 phi1)))))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (cos.f64 (-.f64 phi2 phi1)))
(/.f64 (-.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal -2 binary64))

eval310.0ms (1.6%)

Memory
-2.5MiB live, 943.3MiB allocated
Compiler

Compiled 71 742 to 4 308 computations (94% saved)

prune431.0ms (2.2%)

Memory
-7.4MiB live, 1 400.7MiB allocated
Pruning

81 alts after pruning (78 fresh and 3 done)

PrunedKeptTotal
New1 806331 839
Fresh144559
Picked235
Done101
Total1 823811 904
Accuracy
96.4%
Counts
1 904 → 81
Alt Table
Click to see full alt table
StatusAccuracyProgram
75.5%
(fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
75.2%
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) R) (fma.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64))))
75.3%
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) R) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
75.4%
(+.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R) (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
74.7%
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
74.9%
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
75.4%
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
39.5%
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))) R)
43.8%
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
28.5%
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
75.2%
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))) R)
39.4%
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))))) R)
43.8%
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
28.4%
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
75.1%
(*.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
61.7%
(*.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
95.8%
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
53.8%
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))) R)
75.2%
(*.f64 (acos.f64 (fma.f64 (*.f64 (sin.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (/.f64 (sin.f64 phi2) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) R)
39.6%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
75.5%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
75.2%
(*.f64 (acos.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
95.7%
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) (-.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
95.6%
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))))) R)
75.2%
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))) R)
75.9%
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (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) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
43.0%
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 #s(approx (cos (+ phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64)))) R)
44.3%
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(approx (cos (- phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
51.8%
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
41.8%
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
44.0%
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
95.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.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) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) R)
53.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
75.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
28.0%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
57.8%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
28.5%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
49.5%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
58.2%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
49.4%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
56.4%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
45.3%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) R)
39.3%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
31.3%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
34.9%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
46.3%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
25.5%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))))) R)
27.3%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi1) (cos.f64 lambda1) (*.f64 phi2 (sin.f64 phi1)))))) R)
26.2%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
34.2%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) R)
31.6%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
54.5%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
47.0%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
53.0%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
53.7%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
95.8%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
54.5%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
53.0%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
34.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
53.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
34.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
34.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
44.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
43.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
23.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
25.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
30.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
9.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
10.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
12.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))))) R)
9.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))))))) R)
28.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
27.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
33.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
33.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
20.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
28.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
13.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
12.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
17.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
19.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
Compiler

Compiled 5 366 to 3 118 computations (41.9% saved)

simplify311.0ms (1.6%)

Memory
29.6MiB live, 307.8MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))
cost-diff0
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
cost-diff128
(+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
cost-diff128
(-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))
cost-diff0
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
cost-diff0
#s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
cost-diff0
(acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
cost-diff0
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
cost-diff0
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
cost-diff0
#s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))
cost-diff0
(acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))))
cost-diff0
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
cost-diff0
#s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))
cost-diff0
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))
cost-diff0
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))
cost-diff0
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
cost-diff0
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
cost-diff0
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
cost-diff0
(acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
cost-diff0
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
Rules
5 744×lower-fma.f32
5 734×lower-fma.f64
2 276×lower-*.f32
2 248×lower-*.f64
2 122×unsub-neg
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
097927
0150931
1259869
2382869
3513869
4600869
5808869
61080869
71513869
82808869
94516869
105489869
115638869
125661869
135669869
145673869
155744869
165762869
175762869
186080869
196220869
206220869
216220869
226220869
06220850
Stop Event
iter limit
saturated
iter limit
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(cos.f64 phi2)
phi2
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
(sin.f64 lambda2)
(cos.f64 phi1)
phi1
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi2)
(sin.f64 phi1)
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))
#s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))
(cos.f64 lambda1)
lambda1
R
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))))
#s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(cos.f64 phi1)
phi1
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(*.f64 phi2 (sin.f64 phi1))
phi2
(sin.f64 phi1)
R
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(cos.f64 lambda2)
lambda2
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
(sin.f64 phi2)
R
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))
#s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(cos.f64 phi2)
phi2
(+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
#s(literal 1/2 binary64)
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(cos.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda2)
(sin.f64 lambda1)
(*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 phi1 phi2))
(+.f64 phi1 phi2)
phi1
R
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(cos.f64 phi2)
phi2
(*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
(sin.f64 lambda2)
(cos.f64 phi1)
phi1
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi2)
(sin.f64 phi1)
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))
#s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))
(cos.f64 lambda1)
lambda1
R
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 R (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))
(acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))))
(acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1)))))
#s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))
#s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1)))
(cos.f64 phi1)
phi1
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(*.f64 phi2 (sin.f64 phi1))
phi2
(sin.f64 phi1)
R
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(cos.f64 lambda2)
lambda2
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi1)
(sin.f64 phi2)
R
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 R (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64))))))))
(acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))))))
(-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
#s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))))
(*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64))))
(cos.f64 phi2)
phi2
(+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda2)
(sin.f64 lambda1)
(*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))
(cos.f64 (+.f64 phi1 phi2))
(+.f64 phi1 phi2)
phi1
R

localize645.0ms (3.2%)

Memory
-5.7MiB live, 1 957.3MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.4673400703955934
(-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))
accuracy2.508463760552225
(acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))
accuracy14.314051984535576
(cos.f64 (+.f64 phi1 phi2))
accuracy30.388928249530107
#s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
accuracy0.20703125
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
accuracy0.21484375
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
accuracy2.508463760552225
(acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
accuracy29.25462629454335
#s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
accuracy0.21484375
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
accuracy2.508463760552225
(acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))))
accuracy14.681038471317523
(cos.f64 (-.f64 lambda2 lambda1))
accuracy29.150730068027514
#s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))
accuracy2.508463760552225
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))
accuracy27.182677679121824
#s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))
accuracy29.377505529794963
#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))
accuracy30.385175815532314
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))
accuracy0.18359375
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
accuracy0.20703125
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
accuracy0.21484375
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
accuracy2.508463760552225
(acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
Samples
527.0ms251×1valid
3.0ms2valid
3.0ms0valid
Compiler

Compiled 671 to 79 computations (88.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 473.0ms
ival-cos: 177.0ms (37.5% of total)
ival-mult: 102.0ms (21.6% of total)
ival-sin: 58.0ms (12.3% of total)
adjust: 48.0ms (10.2% of total)
ival-acos: 40.0ms (8.5% of total)
ival-add: 35.0ms (7.4% of total)
ival-sub: 12.0ms (2.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series102.0ms (0.5%)

Memory
10.7MiB live, 329.5MiB allocated
Counts
27 → 1 164
Calls
Call 1
Inputs
#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())
#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())
#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())
#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())
#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())
#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())
#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())
#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())
#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())
#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())
#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())
#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())
#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())
#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())
#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())
Outputs
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda1 lambda2))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (neg lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (cos phi2)) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) (patch #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) (patch (*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) (patch (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (* -1/2 (sin (neg phi2))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/4 (cos (neg phi2)))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* -1/4 (cos (neg phi2))) (* phi1 (- (* 1/12 (sin (neg phi2))) (* 1/12 (sin phi2)))))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (- (* 1/2 (sin phi1)) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (- (+ (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (sin phi1))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (- (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* phi2 (- (* -1/12 (sin phi1)) (* 1/12 (sin phi1))))))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) (patch #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda2 lambda1)) (* phi1 phi2)) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda2 lambda1)) (* phi1 (+ phi2 (* -1/2 (* phi1 (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda2 lambda1)) (* phi1 (+ phi2 (* phi1 (+ (* -1/2 (cos (- lambda2 lambda1))) (* -1/6 (* phi1 phi2))))))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos phi1) (sin (neg lambda1))))) (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi1) (cos (neg lambda1))))))) (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi1) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi1) (sin (neg lambda1))))))))) (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos lambda2) (cos phi1))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (sin lambda2))) (+ (* phi2 (sin phi1)) (* (cos lambda2) (cos phi1)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi1)))) (* (cos phi1) (sin lambda2)))) (+ (* phi2 (sin phi1)) (* (cos lambda2) (cos phi1)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* lambda1 (* (cos phi1) (sin lambda2)))))) (* (cos phi1) (sin lambda2)))) (+ (* phi2 (sin phi1)) (* (cos lambda2) (cos phi1)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda2 lambda1))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (sin phi1)) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (/ (* (cos phi1) (cos (- lambda2 lambda1))) phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (/ (* (cos phi1) (cos (- lambda2 lambda1))) phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (/ (* (cos phi1) (cos (- lambda2 lambda1))) phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (sin phi1)) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ (* -1 (sin phi1)) (* -1 (/ (* (cos phi1) (cos (- lambda2 lambda1))) phi2))))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ (* -1 (sin phi1)) (* -1 (/ (* (cos phi1) (cos (- lambda2 lambda1))) phi2))))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ (* -1 (sin phi1)) (* -1 (/ (* (cos phi1) (cos (- lambda2 lambda1))) phi2))))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) (patch (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) (patch (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (patch (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (patch #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2))))))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (cos phi2)) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos lambda2) (cos phi2)))))) (* (cos lambda2) (cos phi2))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos lambda2) (cos phi2))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (cos phi1)) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos lambda2) (cos phi1))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos lambda2) (cos phi1)))))) (* (cos lambda2) (cos phi1))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos lambda2) (cos phi1))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (patch (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (* -1/2 (sin (neg phi2))) (* -1/2 (sin phi2)))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/4 (cos (neg phi2)))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* phi1 (- (* 1/12 (sin (neg phi2))) (* 1/12 (sin phi2)))))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (- (* 1/2 (sin phi1)) (* -1/2 (sin phi1)))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (- (+ (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (sin phi1))) (* -1/2 (sin phi1)))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (- (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* phi2 (- (* -1/12 (sin phi1)) (* 1/12 (sin phi1))))))) (* -1/2 (sin phi1)))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda2) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor inf lambda1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))) (taylor -inf lambda1) (#s(alt (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (patch (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (cos lambda1)) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (cos lambda1) (* lambda2 (sin lambda1)))) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (cos lambda2)) (taylor 0 lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (cos lambda2) (* lambda1 (sin lambda2)))) (taylor 0 lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))) (taylor 0 lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 phi2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor 0 R) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor inf R) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))) (taylor -inf R) (#s(alt (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) (patch (*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 phi2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf phi2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))) (taylor -inf phi2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda2) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor 0 lambda1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor inf lambda1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))) (taylor -inf lambda1) (#s(alt (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (patch (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (sin phi1)) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1))))) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (sin phi2)) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2)))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (sin lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda1)) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (sin phi2)) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2)))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (sin phi1)) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1))))) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* phi1 (sin (neg phi2)))) (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/4 (cos (neg phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2))))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos phi1)) (+ (* 1/2 (* phi2 (sin phi1))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos phi1)) (+ (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/4 (cos phi1)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos phi1)) (+ (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi2) (* -1 (* phi1 (sin phi2)))) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2)))) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2)))) (taylor 0 phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos phi1) (taylor 0 phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* -1 (* phi2 (sin phi1)))) (taylor 0 phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1)))) (taylor 0 phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1)))) (taylor 0 phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (+.f64 phi1 phi2)) (patch (cos.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
Calls

291 calls:

TimeVariablePointExpression
2.0ms
lambda2
@0
(+ (* (cos phi2) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (cos phi1))) (* (sin phi2) (sin phi1)))
1.0ms
lambda2
@-inf
(+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))
1.0ms
phi1
@inf
(+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1)))
0.0ms
phi1
@-inf
(+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1)))
0.0ms
lambda2
@inf
(+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1)))

simplify402.0ms (2%)

Memory
-8.9MiB live, 993.8MiB allocated
Algorithm
egg-herbie
Rules
18 760×lower-fma.f64
18 760×lower-fma.f32
5 782×lower-*.f64
5 782×lower-*.f32
4 886×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
074927637
1251325564
2750425501
0806623429
Stop Event
iter limit
node limit
Counts
1 164 → 1 164
Calls
Call 1
Inputs
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(cos (- lambda2 lambda1))
(+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1)))))
(+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1)))))))
(+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (neg lambda1)))
(+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(* (cos lambda2) (cos phi2))
(+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(- (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (* -1/2 (sin (neg phi2))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/4 (cos (neg phi2)))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* -1/4 (cos (neg phi2))) (* phi1 (- (* 1/12 (sin (neg phi2))) (* 1/12 (sin phi2)))))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (- (* 1/2 (sin phi1)) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (- (+ (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (sin phi1))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (- (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* phi2 (- (* -1/12 (sin phi1)) (* 1/12 (sin phi1))))))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(cos (- lambda2 lambda1))
(+ (cos (- lambda2 lambda1)) (* phi1 phi2))
(+ (cos (- lambda2 lambda1)) (* phi1 (+ phi2 (* -1/2 (* phi1 (cos (- lambda2 lambda1)))))))
(+ (cos (- lambda2 lambda1)) (* phi1 (+ phi2 (* phi1 (+ (* -1/2 (cos (- lambda2 lambda1))) (* -1/6 (* phi1 phi2)))))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg lambda1))))
(+ (* -1 (* lambda2 (* (cos phi1) (sin (neg lambda1))))) (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg lambda1)))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi1) (cos (neg lambda1))))))) (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg lambda1)))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi1) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi1) (sin (neg lambda1))))))))) (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg lambda1)))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ (* phi2 (sin phi1)) (* (cos lambda2) (cos phi1)))
(+ (* lambda1 (* (cos phi1) (sin lambda2))) (+ (* phi2 (sin phi1)) (* (cos lambda2) (cos phi1))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi1)))) (* (cos phi1) (sin lambda2)))) (+ (* phi2 (sin phi1)) (* (cos lambda2) (cos phi1))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* lambda1 (* (cos phi1) (sin lambda2)))))) (* (cos phi1) (sin lambda2)))) (+ (* phi2 (sin phi1)) (* (cos lambda2) (cos phi1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))
(* (cos phi1) (cos (- lambda2 lambda1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (/ (* (cos phi1) (cos (- lambda2 lambda1))) phi2)))
(* phi2 (+ (sin phi1) (/ (* (cos phi1) (cos (- lambda2 lambda1))) phi2)))
(* phi2 (+ (sin phi1) (/ (* (cos phi1) (cos (- lambda2 lambda1))) phi2)))
(* phi2 (sin phi1))
(* -1 (* phi2 (+ (* -1 (sin phi1)) (* -1 (/ (* (cos phi1) (cos (- lambda2 lambda1))) phi2)))))
(* -1 (* phi2 (+ (* -1 (sin phi1)) (* -1 (/ (* (cos phi1) (cos (- lambda2 lambda1))) phi2)))))
(* -1 (* phi2 (+ (* -1 (sin phi1)) (* -1 (/ (* (cos phi1) (cos (- lambda2 lambda1))) phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+ (* -1/2 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda2 2) (* (cos phi1) (cos phi2))))))))
(+ (* (cos phi1) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2)))))))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(* (cos lambda2) (cos phi2))
(+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2)))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos lambda2) (cos phi2)))))) (* (cos lambda2) (cos phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos lambda2) (cos phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(* (cos lambda2) (cos phi1))
(+ (* phi2 (sin phi1)) (* (cos lambda2) (cos phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos lambda2) (cos phi1)))))) (* (cos lambda2) (cos phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos lambda2) (cos phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (* -1/2 (sin (neg phi2))) (* -1/2 (sin phi2)))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/4 (cos (neg phi2)))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* phi1 (- (* 1/12 (sin (neg phi2))) (* 1/12 (sin phi2)))))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi2 (- (* 1/2 (sin phi1)) (* -1/2 (sin phi1)))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (- (+ (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (sin phi1))) (* -1/2 (sin phi1)))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (- (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* phi2 (- (* -1/12 (sin phi1)) (* 1/12 (sin phi1))))))) (* -1/2 (sin phi1)))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(+ 1/2 (cos lambda1))
(+ 1/2 (+ (cos lambda1) (* lambda2 (sin lambda1))))
(+ 1/2 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1)))))))
(+ 1/2 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1)))))))))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ 1/2 (cos lambda2))
(+ 1/2 (+ (cos lambda2) (* lambda1 (sin lambda2))))
(+ 1/2 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))
(+ 1/2 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2)))))))))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* lambda1 (sin lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* lambda2 (sin lambda1))
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(* phi1 (sin phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* phi2 (sin phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* -1/2 (* phi1 (sin (neg phi2)))) (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/4 (cos (neg phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2))))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* 1/2 (cos phi1)) (+ (* 1/2 (* phi2 (sin phi1))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos phi1)) (+ (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/4 (cos phi1)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos phi1)) (+ (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(cos phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
Outputs
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi1 (sin.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi1 (cos.f64 phi2))) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi1 (fma.f64 phi1 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi2 (fma.f64 phi2 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (sin.f64 phi1))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi2 (fma.f64 phi2 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 #s(literal -1/6 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) lambda1)))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda1 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (*.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 lambda1 #s(literal -1/6 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi2 (fma.f64 phi2 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (sin.f64 phi1))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi2 (fma.f64 phi2 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) lambda1)))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda1 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (*.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 lambda1 #s(literal -1/6 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 #s(literal -1/6 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi1 (sin.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi1 (cos.f64 phi2))) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi1 (fma.f64 phi1 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 phi1 (fma.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (cos.f64 phi2))) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (fma.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (fma.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) lambda1)))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda1 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (*.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 phi2)))) (*.f64 lambda1 #s(literal 1/6 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 #s(literal -1/6 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1)))))))
(fma.f64 (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (neg lambda1)))
(*.f64 (cos.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 lambda2 (fma.f64 (cos.f64 phi2) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda1))) (*.f64 lambda2 #s(literal 1/6 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos lambda2) (cos phi2))
(*.f64 (cos.f64 lambda2) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) lambda1)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(fma.f64 lambda1 (fma.f64 (cos.f64 phi2) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) lambda1))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 lambda1 #s(literal -1/6 binary64)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (* -1/2 (sin (neg phi2))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(+.f64 (fma.f64 (*.f64 phi1 #s(literal -1/2 binary64)) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/4 (cos (neg phi2)))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(+.f64 (fma.f64 phi1 (fma.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* -1/4 (cos (neg phi2))) (* phi1 (- (* 1/12 (sin (neg phi2))) (* 1/12 (sin phi2)))))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(+.f64 (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 phi1 #s(literal 1/12 binary64)) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* phi2 (- (* 1/2 (sin phi1)) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (- (+ (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (sin phi1))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (fma.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* phi2 (- (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* phi2 (- (* -1/12 (sin phi1)) (* 1/12 (sin phi1))))))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(fma.f64 phi2 (fma.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 lambda1 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (*.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 phi2)))) (*.f64 lambda1 #s(literal 1/6 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 #s(literal -1/6 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(+ (cos (- lambda2 lambda1)) (* phi1 phi2))
(fma.f64 phi1 phi2 (cos.f64 (-.f64 lambda2 lambda1)))
(+ (cos (- lambda2 lambda1)) (* phi1 (+ phi2 (* -1/2 (* phi1 (cos (- lambda2 lambda1)))))))
(fma.f64 phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal -1/2 binary64) phi1) phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (cos (- lambda2 lambda1)) (* phi1 (+ phi2 (* phi1 (+ (* -1/2 (cos (- lambda2 lambda1))) (* -1/6 (* phi1 phi2)))))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (*.f64 phi2 #s(literal -1/6 binary64)))) phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (* -1 (* lambda2 (* (cos phi1) (sin (neg lambda1))))) (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg lambda1)))))
(fma.f64 phi2 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi1) (*.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 phi1))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi1) (cos (neg lambda1))))))) (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg lambda1)))))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi1) (fma.f64 lambda2 (fma.f64 (cos.f64 phi1) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 lambda1) lambda2))) (*.f64 phi2 (sin.f64 phi1))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi1) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi1) (sin (neg lambda1))))))))) (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg lambda1)))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64)) (*.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (*.f64 lambda2 #s(literal 1/6 binary64))) (cos.f64 phi1))) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos lambda2) (cos phi1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (* lambda1 (* (cos phi1) (sin lambda2))) (+ (* phi2 (sin phi1)) (* (cos lambda2) (cos phi1))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi1) (fma.f64 lambda1 (*.f64 (cos.f64 phi1) (sin.f64 lambda2)) (*.f64 phi2 (sin.f64 phi1))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi1)))) (* (cos phi1) (sin lambda2)))) (+ (* phi2 (sin phi1)) (* (cos lambda2) (cos phi1))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi1) (fma.f64 lambda1 (fma.f64 (cos.f64 phi1) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 #s(literal -1/2 binary64) lambda1))) (*.f64 phi2 (sin.f64 phi1))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* lambda1 (* (cos phi1) (sin lambda2)))))) (* (cos phi1) (sin lambda2)))) (+ (* phi2 (sin phi1)) (* (cos lambda2) (cos phi1))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 lambda2)) (*.f64 lambda1 #s(literal -1/6 binary64)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(* phi2 (sin phi1))
(*.f64 phi2 (sin.f64 phi1))
(* phi2 (+ (sin phi1) (/ (* (cos phi1) (cos (- lambda2 lambda1))) phi2)))
(*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))
(* phi2 (+ (sin phi1) (/ (* (cos phi1) (cos (- lambda2 lambda1))) phi2)))
(*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))
(* phi2 (+ (sin phi1) (/ (* (cos phi1) (cos (- lambda2 lambda1))) phi2)))
(*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))
(* phi2 (sin phi1))
(*.f64 phi2 (sin.f64 phi1))
(* -1 (* phi2 (+ (* -1 (sin phi1)) (* -1 (/ (* (cos phi1) (cos (- lambda2 lambda1))) phi2)))))
(*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))
(* -1 (* phi2 (+ (* -1 (sin phi1)) (* -1 (/ (* (cos phi1) (cos (- lambda2 lambda1))) phi2)))))
(*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))
(* -1 (* phi2 (+ (* -1 (sin phi1)) (* -1 (/ (* (cos phi1) (cos (- lambda2 lambda1))) phi2)))))
(*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) lambda1)))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda1 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (*.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 lambda1 #s(literal -1/6 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 #s(literal -1/6 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi2 (fma.f64 phi2 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (sin.f64 phi1))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi2 (fma.f64 phi2 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi1 (sin.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi1 (cos.f64 phi2))) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi1 (fma.f64 phi1 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* -1/2 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda2 2) (* (cos phi1) (cos phi2))))))))
(fma.f64 lambda2 (*.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda2 lambda2) #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos phi1) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2)))))))))
(+.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2) #s(literal 1/24 binary64))) (*.f64 (*.f64 lambda2 lambda2) (*.f64 lambda2 lambda2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(* (cos lambda2) (cos phi2))
(*.f64 (cos.f64 lambda2) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos lambda2) (cos phi2)))))) (* (cos lambda2) (cos phi2)))
(fma.f64 phi1 (fma.f64 phi1 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos lambda2) (cos phi2)))
(fma.f64 phi1 (fma.f64 phi1 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(* (cos lambda2) (cos phi1))
(*.f64 (cos.f64 lambda2) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos lambda2) (cos phi1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos lambda2) (cos phi1)))))) (* (cos lambda2) (cos phi1)))
(fma.f64 phi2 (fma.f64 phi2 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (sin.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos lambda2) (cos phi1)))
(fma.f64 phi2 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/2 (cos phi2)))
(fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (* -1/2 (sin (neg phi2))) (* -1/2 (sin phi2)))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos phi2)))
(+.f64 (fma.f64 (*.f64 phi1 #s(literal -1/2 binary64)) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/4 (cos (neg phi2)))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos phi2)))
(+.f64 (fma.f64 phi1 (fma.f64 phi1 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* phi1 (- (* 1/12 (sin (neg phi2))) (* 1/12 (sin phi2)))))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos phi2)))
(+.f64 (fma.f64 phi1 (fma.f64 phi1 (fma.f64 phi1 (*.f64 #s(literal 1/12 binary64) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* phi2 (- (* 1/2 (sin phi1)) (* -1/2 (sin phi1)))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (- (+ (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (sin phi1))) (* -1/2 (sin phi1)))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi2 (fma.f64 phi2 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (sin.f64 phi1))))
(+ (* phi2 (- (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* phi2 (- (* -1/12 (sin phi1)) (* 1/12 (sin phi1))))))) (* -1/2 (sin phi1)))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 phi2 (fma.f64 phi2 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 #s(literal -1/6 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 lambda1 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (*.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 lambda1 #s(literal -1/6 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(+ 1/2 (cos lambda1))
(+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64))
(+ 1/2 (+ (cos lambda1) (* lambda2 (sin lambda1))))
(fma.f64 lambda2 (sin.f64 lambda1) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64)))
(+ 1/2 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1)))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (fma.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (sin.f64 lambda1)) (cos.f64 lambda1)))
(+ 1/2 (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1)))))))))
(fma.f64 lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (sin.f64 lambda1))) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (cos lambda2))
(+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64))
(+ 1/2 (+ (cos lambda2) (* lambda1 (sin lambda2))))
(fma.f64 lambda1 (sin.f64 lambda2) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2)))))))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (sin.f64 lambda2))) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(* phi2 (sin phi1))
(*.f64 phi2 (sin.f64 phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(*.f64 phi2 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1)))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(*.f64 phi2 (fma.f64 (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64))) (sin.f64 phi1)))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(*.f64 phi2 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1) (*.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi2 phi2) #s(literal 1/120 binary64)))))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* phi1 (sin phi2))
(*.f64 phi1 (sin.f64 phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(*.f64 phi1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2)))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (sin.f64 phi2)))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(*.f64 phi1 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2) (*.f64 (*.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1)))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(*.f64 lambda1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (sin.f64 lambda2)))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(*.f64 lambda1 (fma.f64 (*.f64 lambda1 lambda1) (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (sin.f64 lambda2)))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(*.f64 lambda1 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* lambda2 (sin lambda1))
(*.f64 lambda2 (sin.f64 lambda1))
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(*.f64 lambda2 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (sin.f64 lambda1)))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(*.f64 lambda2 (fma.f64 (*.f64 lambda2 lambda2) (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (sin.f64 lambda1)))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(*.f64 lambda2 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64))) (*.f64 (*.f64 lambda2 lambda2) (*.f64 lambda2 lambda2)))))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 lambda2 (fma.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (sin.f64 lambda1)) (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 lambda1) #s(literal -1/2 binary64) (*.f64 (sin.f64 (neg.f64 lambda1)) (*.f64 lambda2 #s(literal 1/6 binary64)))) (sin.f64 lambda1)) (cos.f64 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (sin.f64 lambda2))) (cos.f64 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 lambda2 (fma.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (sin.f64 lambda1)) (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 lambda1) #s(literal -1/2 binary64) (*.f64 (sin.f64 (neg.f64 lambda1)) (*.f64 lambda2 #s(literal 1/6 binary64)))) (sin.f64 lambda1)) (cos.f64 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (sin.f64 lambda2))) (cos.f64 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(* phi1 (sin phi2))
(*.f64 phi1 (sin.f64 phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(*.f64 phi1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2)))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (sin.f64 phi2)))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))
(*.f64 phi1 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2) (*.f64 (*.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1)))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* phi2 (sin phi1))
(*.f64 phi2 (sin.f64 phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(*.f64 phi2 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1)))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(*.f64 phi2 (fma.f64 (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64))) (sin.f64 phi1)))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(*.f64 phi2 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 phi1) (*.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi2 phi2) #s(literal 1/120 binary64)))))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64))))
(+ (* -1/2 (* phi1 (sin (neg phi2)))) (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 phi1 (*.f64 (sin.f64 phi2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))))
(+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/4 (cos (neg phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (*.f64 (cos.f64 phi2) #s(literal -1/4 binary64))) (*.f64 (sin.f64 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))))
(+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2))))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (fma.f64 phi1 (*.f64 (sin.f64 phi2) #s(literal -1/12 binary64)) (*.f64 (cos.f64 phi2) #s(literal -1/4 binary64)))) (*.f64 (sin.f64 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64))))
(+ (* 1/2 (cos phi1)) (+ (* 1/2 (* phi2 (sin phi1))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64))) (*.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal 1/2 binary64)))
(+ (* 1/2 (cos phi1)) (+ (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/4 (cos phi1)))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64))) (*.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64)))) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))
(+ (* 1/2 (cos phi1)) (+ (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 phi2 (*.f64 (sin.f64 phi1) #s(literal -1/12 binary64)) (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))))) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 #s(literal -1/6 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(fma.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(fma.f64 lambda1 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (*.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 lambda1 #s(literal -1/6 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(cos phi2)
(cos.f64 phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(-.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(fma.f64 phi1 (-.f64 (*.f64 phi1 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (sin.f64 phi2)) (cos.f64 phi2))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 phi1 (sin.f64 phi2)) #s(literal 1/6 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (sin.f64 (neg.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 (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(-.f64 (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(fma.f64 phi2 (-.f64 (*.f64 phi2 (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (sin.f64 phi1)) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(fma.f64 phi2 (-.f64 (*.f64 phi2 (fma.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal 1/6 binary64) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64)))) (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))

rewrite295.0ms (1.5%)

Memory
-3.9MiB live, 748.1MiB allocated
Rules
5 938×lower-fma.f32
5 928×lower-fma.f64
4 508×lower-*.f32
4 480×lower-*.f64
2 592×lower-pow.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
097789
0150718
1567614
24074614
08377604
Stop Event
iter limit
node limit
iter limit
Counts
27 → 330
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))
#s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))))
#s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1)))
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
#s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(cos.f64 (+.f64 phi1 phi2))
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (/.f64 (pow.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(-.f64 (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.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 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (cos.f64 phi1)) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (cos.f64 lambda1) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.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 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #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 #s(literal 2 binary64) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))))
(fma.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 lambda2)) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (-.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #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 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #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) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (-.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #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) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (-.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #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) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))) (neg.f64 (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64))) (-.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (-.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #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) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (-.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #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) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2))) (fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(*.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 R (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))
#s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))
(*.f64 R (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) R)
(acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1)))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1)))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1)))))))
#s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))
(+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 (sin.f64 phi1)))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (-.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 (sin.f64 phi1)))) (/.f64 (*.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 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 (sin.f64 phi1)))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1)))
(fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi1) phi2 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.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 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 phi2 (sin.f64 phi1)) (-.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal 3 binary64))) (fma.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 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.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 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 (sin.f64 phi1))))
(/.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 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 phi2 (sin.f64 phi1)) (-.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 (sin.f64 phi1))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.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 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.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 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 phi2 (sin.f64 phi1)) (-.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (*.f64 phi2 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))) (neg.f64 (-.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 (sin.f64 phi1)))))
(/.f64 (-.f64 (*.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 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (-.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.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 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 phi2 (sin.f64 phi1)) (-.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 (sin.f64 phi1))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (*.f64 phi2 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.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 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 phi2 (sin.f64 phi1)) (-.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.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 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.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 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 (sin.f64 phi1)))))
(*.f64 R (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
#s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #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) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))) (neg.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64)) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))
(-.f64 (/.f64 (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.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 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 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(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.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 phi1 phi2)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 phi1 phi2))) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(fma.f64 (neg.f64 (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64)) #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(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 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 phi1 phi2)))))) (*.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #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 phi1 phi2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #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 phi1 phi2))))))) (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64))))
(/.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(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #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 phi1 phi2)) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #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 phi1 phi2)))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64)) #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(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #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 phi1 phi2)))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(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(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #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 phi1 phi2)) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #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 phi1 phi2)))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) #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 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #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 phi1 phi2))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) #s(literal 1/2 binary64)))
(+.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) #s(literal 1/2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) #s(literal 1/2 binary64)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(literal 1/2 binary64)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) #s(literal 1/2 binary64)))
(fma.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 #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) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) #s(literal 1/2 binary64))
(fma.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 #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) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 1/2 binary64))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64))
(fma.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) #s(literal 1/2 binary64))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.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 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.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 lambda1 lambda2))))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) #s(literal 1/2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) #s(literal 1/4 binary64)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 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) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) #s(literal 1/2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))) #s(literal -1 binary64))
(*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 R (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(*.f64 (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -1 binary64))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.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 lambda2) (sin.f64 (neg.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (/.f64 (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (cos.f64 (+.f64 lambda2 lambda1))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (/.f64 (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(/.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))) (fma.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.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) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (+.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 #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) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (+.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 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2))))))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (neg.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)))) (neg.f64 (fma.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (neg.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)))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 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) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (+.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)))) #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) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (+.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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #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) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #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) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64))
#s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (neg.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi1)))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(+.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))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (neg.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (neg.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (neg.f64 (*.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 (sin.f64 (neg.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(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 (-.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (-.f64 (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 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 (neg.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal -2 binary64))

eval203.0ms (1%)

Memory
14.7MiB live, 649.0MiB allocated
Compiler

Compiled 43 248 to 2 287 computations (94.7% saved)

prune423.0ms (2.1%)

Memory
-1.8MiB live, 1 332.6MiB allocated
Pruning

88 alts after pruning (82 fresh and 6 done)

PrunedKeptTotal
New1 470241 494
Fresh155873
Picked235
Done033
Total1 487881 575
Accuracy
96.4%
Counts
1 575 → 88
Alt Table
Click to see full alt table
StatusAccuracyProgram
75.5%
(fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
75.2%
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) R) (fma.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64))))
75.3%
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) R) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
75.4%
(+.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R) (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
74.7%
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
74.9%
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
75.4%
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
41.8%
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
39.5%
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))) R)
39.2%
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))) R)
52.9%
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
19.2%
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
43.8%
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
28.5%
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
39.2%
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))))) R)
52.8%
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))))) R)
43.8%
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
75.1%
(*.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
61.7%
(*.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
95.8%
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
53.8%
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))) R)
75.2%
(*.f64 (acos.f64 (fma.f64 (*.f64 (sin.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (/.f64 (sin.f64 phi2) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) R)
39.6%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
41.8%
(*.f64 (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
75.2%
(*.f64 (acos.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
95.7%
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) (-.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
95.6%
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))))) R)
75.2%
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))) R)
43.0%
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 #s(approx (cos (+ phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64)))) R)
44.3%
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(approx (cos (- phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
53.5%
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 #s(approx (cos (+ phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64)))) R)
28.7%
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
29.1%
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
44.0%
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
95.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.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) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) R)
75.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
28.0%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
28.5%
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
49.4%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
56.4%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
45.3%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) R)
28.3%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1))))) R)
49.2%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))))))) (*.f64 phi2 (sin.f64 phi1))))) R)
23.3%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
21.6%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1))))) R)
25.5%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) R)
31.3%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
34.9%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
39.4%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))))) R)
12.5%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
25.5%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))))) R)
26.2%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
34.2%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) R)
31.6%
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
54.5%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
53.0%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R)
47.0%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
53.0%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
53.7%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
31.0%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
30.9%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
31.5%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
95.8%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
57.8%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) #s(approx (* (sin phi2) (sin phi1)) (*.f64 phi2 (sin.f64 phi1)))))) R)
49.5%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) #s(approx (* (sin phi2) (sin phi1)) (*.f64 phi1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2))))))) R)
58.2%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) #s(approx (* (sin phi2) (sin phi1)) (*.f64 phi1 (sin.f64 phi2)))))) R)
54.5%
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
34.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
53.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
34.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
34.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
44.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
43.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
23.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
25.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
9.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
10.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
12.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))))) R)
9.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))))))) R)
28.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
27.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
33.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
33.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
20.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
28.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
12.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
17.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
19.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
Compiler

Compiled 6 883 to 2 443 computations (64.5% saved)

regimes441.0ms (2.2%)

Memory
-7.7MiB live, 1 349.7MiB allocated
Counts
147 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi1) (cos.f64 lambda1) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(approx (cos (- phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 #s(approx (cos (+ phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64)))) R)
(fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(+.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R) (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 #s(approx (cos (+ phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) #s(approx (* (sin phi2) (sin phi1)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) #s(approx (* (sin phi2) (sin phi1)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) #s(approx (* (sin phi2) (sin phi1)) (*.f64 phi1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (fma.f64 #s(approx (* (* (cos phi1) (cos phi2)) (cos lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) #s(approx (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))))) R)
(*.f64 (acos.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))))))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))))))) R)
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) R) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.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) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (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) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) R)
(*.f64 (acos.f64 (fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (sin.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1))))) (/.f64 (sin.f64 phi2) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))) (fma.f64 (+.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 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))) R)
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) R) (fma.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (pow.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))) R)
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 2 binary64))) (-.f64 (fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)))))) R)
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
Calls

10 calls:

44.0ms
(-.f64 lambda1 lambda2)
44.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
43.0ms
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
43.0ms
(cos.f64 (-.f64 lambda1 lambda2))
43.0ms
lambda2
Results
AccuracySegmentsBranch
95.8%1R
95.8%1lambda1
95.8%1lambda2
95.8%1phi1
95.8%1phi2
95.8%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
95.8%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
95.8%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
95.8%1(cos.f64 (-.f64 lambda1 lambda2))
95.8%1(-.f64 lambda1 lambda2)
Compiler

Compiled 114 to 86 computations (24.6% saved)

regimes358.0ms (1.8%)

Memory
-16.4MiB live, 1 104.5MiB allocated
Counts
118 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi1) (cos.f64 lambda1) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(approx (cos (- phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 #s(approx (cos (+ phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64)))) R)
(fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(+.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R) (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 #s(approx (cos (+ phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) #s(approx (* (sin phi2) (sin phi1)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) #s(approx (* (sin phi2) (sin phi1)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) #s(approx (* (sin phi2) (sin phi1)) (*.f64 phi1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
Calls

10 calls:

37.0ms
lambda1
36.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
36.0ms
lambda2
36.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
35.0ms
R
Results
AccuracySegmentsBranch
95.8%1phi1
95.8%1R
95.8%1lambda1
95.8%1phi2
95.8%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
95.8%1(cos.f64 (-.f64 lambda1 lambda2))
95.8%1(-.f64 lambda1 lambda2)
95.8%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
95.8%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
95.8%1lambda2
Compiler

Compiled 114 to 86 computations (24.6% saved)

regimes354.0ms (1.8%)

Memory
10.7MiB live, 1 091.3MiB allocated
Counts
117 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi1) (cos.f64 lambda1) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(approx (cos (- phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 #s(approx (cos (+ phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64)))) R)
(fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(+.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R) (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 #s(approx (cos (+ phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) #s(approx (* (sin phi2) (sin phi1)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) #s(approx (* (sin phi2) (sin phi1)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) #s(approx (* (sin phi2) (sin phi1)) (*.f64 phi1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) #s(approx (* (sin phi2) (sin phi1)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
Calls

10 calls:

36.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
36.0ms
lambda2
36.0ms
lambda1
35.0ms
phi1
34.0ms
phi2
Results
AccuracySegmentsBranch
86.2%3phi1
85.8%3phi2
75.6%1R
81.5%3lambda1
75.6%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
75.6%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
75.6%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
75.6%1(cos.f64 (-.f64 lambda1 lambda2))
78.2%2(-.f64 lambda1 lambda2)
80.9%3lambda2
Compiler

Compiled 114 to 86 computations (24.6% saved)

regimes70.0ms (0.4%)

Memory
-15.7MiB live, 222.0MiB allocated
Counts
107 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi1) (cos.f64 lambda1) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(approx (cos (- phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 #s(approx (cos (+ phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64)))) R)
(fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(+.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R) (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 #s(approx (cos (+ phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
Outputs
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1))))) R)
(fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
Calls

2 calls:

33.0ms
phi1
31.0ms
phi2
Results
AccuracySegmentsBranch
85.7%3phi2
85.2%3phi1
Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes35.0ms (0.2%)

Memory
36.2MiB live, 116.1MiB allocated
Counts
101 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi1) (cos.f64 lambda1) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(approx (cos (- phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 #s(approx (cos (+ phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64)))) R)
(fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(+.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R) (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 phi1 (sin.f64 phi2))))) R)
Outputs
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
Calls

1 calls:

30.0ms
phi2
Results
AccuracySegmentsBranch
85.4%3phi2
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes34.0ms (0.2%)

Memory
-13.5MiB live, 106.5MiB allocated
Counts
93 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi1) (cos.f64 lambda1) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (+ phi2 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))))) R)
(*.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(approx (cos (- phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 #s(approx (cos (+ phi1 phi2)) (cos.f64 phi2)) #s(literal 1/2 binary64)))) R)
Outputs
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
Calls

1 calls:

28.0ms
phi2
Results
AccuracySegmentsBranch
85.4%3phi2
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes30.0ms (0.1%)

Memory
13.6MiB live, 91.9MiB allocated
Counts
81 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi1) (cos.f64 lambda1) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
Outputs
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
Calls

1 calls:

25.0ms
phi2
Results
AccuracySegmentsBranch
85.4%3phi2
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes125.0ms (0.6%)

Memory
-11.7MiB live, 391.8MiB allocated
Counts
79 → 4
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi1) (cos.f64 lambda1) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
Calls

5 calls:

24.0ms
lambda1
24.0ms
(-.f64 lambda1 lambda2)
24.0ms
phi2
24.0ms
lambda2
24.0ms
phi1
Results
AccuracySegmentsBranch
69.9%3(-.f64 lambda1 lambda2)
78.9%3lambda2
80.5%4lambda1
81.0%4phi1
81.0%4phi2
Compiler

Compiled 32 to 26 computations (18.8% saved)

regimes27.0ms (0.1%)

Memory
7.8MiB live, 86.6MiB allocated
Counts
74 → 4
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi1) (cos.f64 lambda1) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
Calls

1 calls:

23.0ms
phi1
Results
AccuracySegmentsBranch
81.0%4phi1
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes27.0ms (0.1%)

Memory
4.1MiB live, 84.3MiB allocated
Counts
73 → 4
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi1) (cos.f64 lambda1) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
Calls

1 calls:

22.0ms
phi1
Results
AccuracySegmentsBranch
81.0%4phi1
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes90.0ms (0.5%)

Memory
-3.3MiB live, 277.0MiB allocated
Counts
70 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi1) (cos.f64 lambda1) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
Calls

4 calls:

23.0ms
phi2
21.0ms
lambda1
21.0ms
phi1
21.0ms
lambda2
Results
AccuracySegmentsBranch
77.8%3lambda1
78.7%3lambda2
71.4%4phi2
75.6%3phi1
Compiler

Compiled 24 to 20 computations (16.7% saved)

regimes175.0ms (0.9%)

Memory
-17.2MiB live, 544.2MiB allocated
Counts
69 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi1) (cos.f64 lambda1) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
Calls

8 calls:

22.0ms
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
22.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
21.0ms
(cos.f64 (-.f64 lambda1 lambda2))
21.0ms
phi1
21.0ms
R
Results
AccuracySegmentsBranch
75.2%3phi1
60.3%2lambda1
54.5%1R
54.5%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
57.6%2(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
57.6%2(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
64.5%2(cos.f64 (-.f64 lambda1 lambda2))
75.0%3lambda2
Compiler

Compiled 100 to 75 computations (25% saved)

regimes47.0ms (0.2%)

Memory
-12.8MiB live, 146.8MiB allocated
Counts
68 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi1) (cos.f64 lambda1) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
Calls

2 calls:

21.0ms
phi1
21.0ms
lambda2
Results
AccuracySegmentsBranch
57.8%3lambda2
72.4%3phi1
Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes86.0ms (0.4%)

Memory
-5.6MiB live, 274.3MiB allocated
Counts
67 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi1) (cos.f64 lambda1) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
Calls

4 calls:

21.0ms
(-.f64 lambda1 lambda2)
20.0ms
phi1
20.0ms
phi2
20.0ms
(cos.f64 (-.f64 lambda1 lambda2))
Results
AccuracySegmentsBranch
59.3%3(cos.f64 (-.f64 lambda1 lambda2))
62.6%3phi2
56.3%2(-.f64 lambda1 lambda2)
63.1%3phi1
Compiler

Compiled 29 to 23 computations (20.7% saved)

regimes23.0ms (0.1%)

Memory
36.7MiB live, 76.0MiB allocated
Counts
64 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi1) (cos.f64 lambda1) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (pow.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (cos.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) #s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (*.f64 (fma.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))) #s(literal 1 binary64)) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (fma.f64 phi2 (*.f64 phi2 #s(literal 1/120 binary64)) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
Calls

1 calls:

19.0ms
phi1
Results
AccuracySegmentsBranch
63.1%3phi1
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes34.0ms (0.2%)

Memory
-13.8MiB live, 107.4MiB allocated
Counts
48 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi2 (-.f64 lambda2 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi1) (cos.f64 lambda1) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda1) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) #s(approx (+ 1/2 (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (+.f64 (cos.f64 lambda2) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 phi2 (sin.f64 phi1))))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(approx (+ (* (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (cos (- phi1 phi2)) 1/2)) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 phi2 (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64))) phi2))))) R)
(*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 #s(approx (* (sin phi1) (+ 1 (* (* phi2 phi2) (+ (* phi2 (* phi2 1/120)) -1/6)))) (fma.f64 (*.f64 phi2 phi2) (*.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64)) phi1) phi1)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
Calls

2 calls:

15.0ms
phi2
15.0ms
phi1
Results
AccuracySegmentsBranch
60.8%2phi2
60.9%2phi1
Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes65.0ms (0.3%)

Memory
15.1MiB live, 214.8MiB allocated
Counts
17 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
Calls

10 calls:

7.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
7.0ms
(-.f64 lambda1 lambda2)
7.0ms
phi1
6.0ms
R
6.0ms
lambda1
Results
AccuracySegmentsBranch
44.0%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
44.0%1R
44.0%1lambda2
46.6%2(-.f64 lambda1 lambda2)
45.7%2(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
45.7%2(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
44.0%1(cos.f64 (-.f64 lambda1 lambda2))
47.5%3lambda1
49.3%2phi2
54.6%2phi1
Compiler

Compiled 114 to 86 computations (24.6% saved)

regimes62.0ms (0.3%)

Memory
-35.5MiB live, 204.4MiB allocated
Counts
16 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* -1/2 (cos (+ phi2 phi1))) (+ (* (cos phi2) (* (cos phi1) (cos lambda1))) (* 1/2 (cos (- phi2 phi1))))) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
Calls

10 calls:

7.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
6.0ms
phi1
6.0ms
R
6.0ms
(-.f64 lambda1 lambda2)
6.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Results
AccuracySegmentsBranch
35.5%3(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
35.5%3R
44.1%2lambda2
35.9%2(cos.f64 (-.f64 lambda1 lambda2))
38.5%4(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
38.5%4(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
46.0%3lambda1
38.2%3(-.f64 lambda1 lambda2)
47.2%4phi2
45.2%3phi1
Compiler

Compiled 114 to 86 computations (24.6% saved)

regimes15.0ms (0.1%)

Memory
8.0MiB live, 48.1MiB allocated
Counts
11 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
Calls

3 calls:

5.0ms
phi2
4.0ms
lambda1
4.0ms
lambda2
Results
AccuracySegmentsBranch
41.6%3phi2
44.0%2lambda2
43.9%2lambda1
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes17.0ms (0.1%)

Memory
19.5MiB live, 59.4MiB allocated
Counts
10 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
Calls

4 calls:

4.0ms
phi1
4.0ms
phi2
4.0ms
lambda2
4.0ms
lambda1
Results
AccuracySegmentsBranch
38.6%2phi2
31.6%1phi1
33.6%2lambda1
38.8%2lambda2
Compiler

Compiled 24 to 20 computations (16.7% saved)

regimes25.0ms (0.1%)

Memory
4.4MiB live, 83.9MiB allocated
Counts
9 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 lambda2 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R)
Calls

6 calls:

4.0ms
(cos.f64 (-.f64 lambda1 lambda2))
4.0ms
lambda2
4.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
4.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
4.0ms
phi2
Results
AccuracySegmentsBranch
28.5%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
28.5%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
35.2%2(cos.f64 (-.f64 lambda1 lambda2))
35.2%2(-.f64 lambda1 lambda2)
30.9%2phi2
28.5%1lambda2
Compiler

Compiled 72 to 54 computations (25% saved)

regimes26.0ms (0.1%)

Memory
-31.1MiB live, 89.9MiB allocated
Counts
6 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (- (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos (- phi1 phi2)) 1/2)) (* (cos (+ phi1 phi2)) 1/2)) #s(approx (+ (* (cos phi1) (cos (- lambda2 lambda1))) (* phi2 (sin phi1))) (*.f64 phi2 (sin.f64 phi1))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))) R)
(*.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
Calls

8 calls:

4.0ms
(-.f64 lambda1 lambda2)
3.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
3.0ms
lambda1
3.0ms
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
3.0ms
(cos.f64 (-.f64 lambda1 lambda2))
Results
AccuracySegmentsBranch
28.5%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
28.5%1phi2
28.5%1phi1
28.5%1lambda1
28.5%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
28.5%1R
28.5%1(cos.f64 (-.f64 lambda1 lambda2))
28.5%1(-.f64 lambda1 lambda2)
Compiler

Compiled 87 to 66 computations (24.1% saved)

regimes20.0ms (0.1%)

Memory
33.1MiB live, 73.0MiB allocated
Counts
2 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)
Calls

10 calls:

2.0ms
R
2.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
2.0ms
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
2.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
2.0ms
lambda1
Results
AccuracySegmentsBranch
19.2%1phi2
28.5%2lambda1
19.2%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
19.2%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
19.2%1R
19.2%1phi1
19.2%1(cos.f64 (-.f64 lambda1 lambda2))
19.2%1(-.f64 lambda1 lambda2)
28.5%2lambda2
19.2%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 114 to 86 computations (24.6% saved)

regimes7.0ms (0%)

Memory
-15.4MiB live, 25.2MiB allocated
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
Calls

4 calls:

2.0ms
lambda2
2.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
1.0ms
lambda1
1.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
19.2%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
19.2%1(-.f64 lambda1 lambda2)
19.2%1lambda1
19.2%1lambda2
Compiler

Compiled 42 to 32 computations (23.8% saved)

bsearch140.0ms (0.7%)

Memory
-10.5MiB live, 427.6MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
67.0ms
0.26861208837176953
2905914591.1505446
64.0ms
-5.514542524186218e+26
-1.9945353233866767e+24
Samples
102.0ms202×1valid
16.0ms86×0valid
Compiler

Compiled 1 085 to 749 computations (31% saved)

Precisions
Click to see histograms. Total time spent on operations: 104.0ms
ival-cos: 40.0ms (38.3% of total)
ival-sin: 29.0ms (27.8% of total)
ival-mult: 13.0ms (12.5% of total)
ival-acos: 9.0ms (8.6% of total)
adjust: 8.0ms (7.7% of total)
ival-add: 3.0ms (2.9% of total)
ival-sub: 2.0ms (1.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch143.0ms (0.7%)

Memory
18.8MiB live, 419.9MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
59.0ms
6.164760706395683e-6
1.750111483987401
74.0ms
-8035533797265.933
-3.308252553914945e-22
Samples
108.0ms253×1valid
12.0ms67×0valid
Compiler

Compiled 1 101 to 770 computations (30.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 104.0ms
ival-cos: 37.0ms (35.5% of total)
ival-sin: 25.0ms (24% of total)
ival-mult: 15.0ms (14.4% of total)
ival-acos: 12.0ms (11.5% of total)
adjust: 9.0ms (8.6% of total)
ival-sub: 3.0ms (2.9% of total)
ival-add: 3.0ms (2.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch131.0ms (0.7%)

Memory
-19.7MiB live, 379.8MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
64.0ms
1.0083088669320814e-18
2.0703413605362062e-11
57.0ms
-8035533797265.933
-3.308252553914945e-22
Samples
102.0ms238×1valid
7.0ms34×0valid
Compiler

Compiled 1 021 to 730 computations (28.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 94.0ms
ival-cos: 33.0ms (35.1% of total)
ival-sin: 20.0ms (21.3% of total)
ival-mult: 15.0ms (15.9% of total)
ival-acos: 11.0ms (11.7% of total)
adjust: 10.0ms (10.6% of total)
ival-add: 3.0ms (3.2% of total)
ival-sub: 2.0ms (2.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch3.0ms (0%)

Memory
8.9MiB live, 8.9MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
1.0083088669320814e-18
2.0703413605362062e-11
1.0ms
-8035533797265.933
-3.308252553914945e-22
Compiler

Compiled 976 to 694 computations (28.9% saved)

bsearch2.0ms (0%)

Memory
8.0MiB live, 7.9MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
1.0083088669320814e-18
2.0703413605362062e-11
1.0ms
-8035533797265.933
-3.308252553914945e-22
Compiler

Compiled 967 to 685 computations (29.2% saved)

bsearch166.0ms (0.8%)

Memory
-12.6MiB live, 345.7MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
0.26861208837176953
2905914591.1505446
94.0ms
-0.0007021725798499669
-5.299011324998051e-17
62.0ms
-7.506064797674816e+225
-3.9210191826394785e+222
Samples
117.0ms198×1valid
17.0ms90×0valid
Compiler

Compiled 1 315 to 921 computations (30% saved)

Precisions
Click to see histograms. Total time spent on operations: 120.0ms
ival-cos: 35.0ms (29.2% of total)
adjust: 33.0ms (27.5% of total)
ival-sin: 25.0ms (20.8% of total)
ival-mult: 12.0ms (10% of total)
ival-acos: 10.0ms (8.3% of total)
ival-sub: 2.0ms (1.7% of total)
ival-add: 2.0ms (1.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch3.0ms (0%)

Memory
10.7MiB live, 10.7MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
0.26861208837176953
2905914591.1505446
1.0ms
-0.0007021725798499669
-5.299011324998051e-17
1.0ms
-7.506064797674816e+225
-3.9210191826394785e+222
Compiler

Compiled 1 315 to 921 computations (30% saved)

bsearch3.0ms (0%)

Memory
10.3MiB live, 10.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
0.26861208837176953
2905914591.1505446
1.0ms
-0.0007021725798499669
-5.299011324998051e-17
1.0ms
-7.506064797674816e+225
-3.9210191826394785e+222
Compiler

Compiled 1 315 to 921 computations (30% saved)

bsearch130.0ms (0.7%)

Memory
-5.5MiB live, 313.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
57.0ms
1310.3389029349114
20857422.92610037
66.0ms
-18.071866943091425
-8.008723601442129e-17
Samples
77.0ms151×1valid
32.0ms137×0valid
Compiler

Compiled 855 to 601 computations (29.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 95.0ms
ival-cos: 44.0ms (46.3% of total)
ival-sin: 20.0ms (21.1% of total)
ival-mult: 12.0ms (12.6% of total)
ival-acos: 8.0ms (8.4% of total)
adjust: 6.0ms (6.3% of total)
ival-sub: 2.0ms (2.1% of total)
ival-add: 2.0ms (2.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch100.0ms (0.5%)

Memory
5.9MiB live, 244.7MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
54.0ms
6.82099427922279e-10
5.713278311077812e-7
39.0ms
-2.4935577383218197
-0.3903379809637812
Samples
71.0ms172×1valid
11.0ms52×0valid
Compiler

Compiled 671 to 473 computations (29.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 71.0ms
ival-cos: 26.0ms (36.9% of total)
ival-sin: 15.0ms (21.3% of total)
ival-mult: 10.0ms (14.2% of total)
ival-acos: 8.0ms (11.3% of total)
adjust: 6.0ms (8.5% of total)
ival-sub: 2.0ms (2.8% of total)
ival-add: 2.0ms (2.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch59.0ms (0.3%)

Memory
-20.3MiB live, 139.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
0.26861208837176953
2905914591.1505446
54.0ms
-15441687769851.395
-382043999153.387
Samples
42.0ms80×1valid
7.0ms32×0valid
Compiler

Compiled 747 to 521 computations (30.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 43.0ms
ival-cos: 16.0ms (37.2% of total)
ival-sin: 13.0ms (30.2% of total)
ival-mult: 5.0ms (11.6% of total)
adjust: 4.0ms (9.3% of total)
ival-acos: 3.0ms (7% of total)
ival-sub: 1.0ms (2.3% of total)
ival-add: 1.0ms (2.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch131.0ms (0.7%)

Memory
-8.8MiB live, 313.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
42.0ms
0.26861208837176953
2905914591.1505446
80.0ms
-382043999153.387
-2.4935577383218197
Samples
94.0ms182×1valid
15.0ms74×0valid
Compiler

Compiled 1 167 to 785 computations (32.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 97.0ms
ival-cos: 36.0ms (37.3% of total)
ival-sin: 29.0ms (30% of total)
ival-mult: 12.0ms (12.4% of total)
ival-acos: 8.0ms (8.3% of total)
adjust: 7.0ms (7.2% of total)
ival-sub: 2.0ms (2.1% of total)
ival-add: 2.0ms (2.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch25.0ms (0.1%)

Memory
21.0MiB live, 60.4MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
14.0ms
0.26861208837176953
2905914591.1505446
9.0ms
-382043999153.387
-2.4935577383218197
Samples
17.0ms36×1valid
2.0ms12×0valid
Compiler

Compiled 1 107 to 745 computations (32.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 17.0ms
ival-cos: 6.0ms (36.1% of total)
ival-sin: 5.0ms (30.1% of total)
ival-mult: 2.0ms (12% of total)
ival-acos: 2.0ms (12% of total)
adjust: 1.0ms (6% of total)
ival-sub: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-add: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch53.0ms (0.3%)

Memory
7.1MiB live, 127.3MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
49.0ms
-16396055330850336.0
-172101094108018.94
Samples
38.0ms78×1valid
7.0ms34×0valid
Compiler

Compiled 265 to 193 computations (27.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 40.0ms
ival-cos: 15.0ms (37.7% of total)
ival-sin: 12.0ms (30.2% of total)
ival-mult: 5.0ms (12.6% of total)
ival-acos: 4.0ms (10.1% of total)
adjust: 3.0ms (7.5% of total)
ival-sub: 1.0ms (2.5% of total)
ival-add: 1.0ms (2.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
2.5MiB live, 2.5MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
-16396055330850336.0
-172101094108018.94
Compiler

Compiled 258 to 186 computations (27.9% saved)

bsearch91.0ms (0.5%)

Memory
-32.2MiB live, 208.9MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
47.0ms
-5.255232957046874e-234
-1.2364220918210286e-235
36.0ms
-4.667854657446718e-26
-8.950564252472354e-27
Samples
57.0ms117×1valid
16.0ms89×0valid
1.0ms2valid
Compiler

Compiled 443 to 311 computations (29.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 66.0ms
ival-cos: 25.0ms (38.1% of total)
ival-sin: 17.0ms (25.9% of total)
ival-mult: 9.0ms (13.7% of total)
ival-acos: 6.0ms (9.1% of total)
adjust: 4.0ms (6.1% of total)
ival-sub: 2.0ms (3% of total)
ival-add: 1.0ms (1.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch51.0ms (0.3%)

Memory
5.5MiB live, 123.8MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
47.0ms
168670246951372.06
748347349685565000.0
Samples
27.0ms61×1valid
15.0ms67×0valid
Compiler

Compiled 283 to 201 computations (29% saved)

Precisions
Click to see histograms. Total time spent on operations: 37.0ms
ival-cos: 16.0ms (43.6% of total)
ival-sin: 9.0ms (24.5% of total)
ival-mult: 5.0ms (13.6% of total)
ival-acos: 3.0ms (8.2% of total)
adjust: 2.0ms (5.4% of total)
ival-sub: 1.0ms (2.7% of total)
ival-add: 1.0ms (2.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch49.0ms (0.2%)

Memory
-3.7MiB live, 116.4MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
45.0ms
962318372534.2941
168670246951372.06
Samples
29.0ms58×1valid
11.0ms54×0valid
Compiler

Compiled 237 to 165 computations (30.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 36.0ms
ival-cos: 15.0ms (42% of total)
ival-sin: 10.0ms (28% of total)
ival-mult: 4.0ms (11.2% of total)
ival-acos: 3.0ms (8.4% of total)
adjust: 2.0ms (5.6% of total)
ival-sub: 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)

bsearch0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-103951934810.56924
-20857422.92610037
Compiler

Compiled 27 to 25 computations (7.4% saved)

bsearch60.0ms (0.3%)

Memory
24.9MiB live, 144.9MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
56.0ms
7.156582515555476e-14
1310.3389029349114
Samples
34.0ms73×1valid
16.0ms87×0valid
Compiler

Compiled 307 to 205 computations (33.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 43.0ms
ival-cos: 18.0ms (41.7% of total)
ival-sin: 10.0ms (23.2% of total)
ival-mult: 6.0ms (13.9% of total)
adjust: 4.0ms (9.3% of total)
ival-acos: 4.0ms (9.3% of total)
ival-sub: 1.0ms (2.3% of total)
ival-add: 1.0ms (2.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

simplify30.0ms (0.2%)

Memory
-3.4MiB live, 75.5MiB allocated
Algorithm
egg-herbie
Rules
116×*-commutative_binary64
22×+-commutative_binary64
14×sub-neg_binary64
10×neg-sub0_binary64
10×neg-mul-1_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02842308
13542308
23682308
33792308
43842308
53852308
Stop Event
saturated
Calls
Call 1
Inputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(if (<=.f64 phi1 #s(literal -1999999999999999966445568 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R) (if (<=.f64 phi1 #s(literal 607985949695017/2251799813685248 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) #s(approx (* (sin phi2) (sin phi1)) (*.f64 phi1 (sin.f64 phi2)))))) R) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))))
(if (<=.f64 phi2 #s(literal -7366891713276647/18889465931478580854784 binary64)) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (if (<=.f64 phi2 #s(literal 1357680363825023/147573952589676412928 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1))))) R) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))))
(if (<=.f64 phi2 #s(literal -4835703278458517/9671406556917033397649408 binary64)) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (if (<=.f64 phi2 #s(literal 3172221350668787/154742504910672534362390528 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))))
(if (<=.f64 phi2 #s(literal -4835703278458517/9671406556917033397649408 binary64)) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (if (<=.f64 phi2 #s(literal 3172221350668787/154742504910672534362390528 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
(if (<=.f64 phi2 #s(literal -4835703278458517/9671406556917033397649408 binary64)) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (if (<=.f64 phi2 #s(literal 3172221350668787/154742504910672534362390528 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)))
(if (<=.f64 phi1 #s(literal -1380000000000000036057810836295478376991357913979448994027682606746000766311264399193596348486503636103450765117756380556709765719226045321539692307029182667538992209960895727282102704285132000322007923290754165323549605101568 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal -7673845534663173/1180591620717411303424 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 607985949695017/2251799813685248 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R) (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R))))
(if (<=.f64 phi1 #s(literal -1380000000000000036057810836295478376991357913979448994027682606746000766311264399193596348486503636103450765117756380556709765719226045321539692307029182667538992209960895727282102704285132000322007923290754165323549605101568 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal -7673845534663173/1180591620717411303424 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 607985949695017/2251799813685248 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))))
(if (<=.f64 phi1 #s(literal -1380000000000000036057810836295478376991357913979448994027682606746000766311264399193596348486503636103450765117756380556709765719226045321539692307029182667538992209960895727282102704285132000322007923290754165323549605101568 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal -7673845534663173/1180591620717411303424 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 607985949695017/2251799813685248 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))))
(if (<=.f64 lambda2 #s(literal -8500259669165361/18889465931478580854784 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R) (if (<=.f64 lambda2 #s(literal 1350 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)))
(if (<=.f64 phi1 #s(literal -3602879701896397/9007199254740992 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal 4061235175267895/9444732965739290427392 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)))
(if (<=.f64 phi1 #s(literal -390000000000 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 607985949695017/2251799813685248 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R) (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)))
(if (<=.f64 phi1 #s(literal -3039929748475085/1125899906842624 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 5291729562160333/2251799813685248 binary64)) (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)))
(if (<=.f64 phi1 #s(literal -5/2 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 5584463537939415/18014398509481984 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R) (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)))
(if (<=.f64 phi1 #s(literal -175000000000000 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R))
(if (<=.f64 phi1 #s(literal -175000000000000 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R))
(if (<=.f64 lambda1 #s(literal -6794758302677299/348449143727040986586495598010130648530944 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (if (<=.f64 lambda1 #s(literal -1324549306229467/3579862989809370150552347991709354811340217396521331566180181212788883000669113019918160533228078546928669938652374965009299607594634172087555628255195572452564109288497401512783350157684872347030630001028968155934491319200842197951919848388309286912 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)))
(if (<=.f64 lambda2 #s(literal 170000000000000 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R))
(if (<=.f64 lambda2 #s(literal 3600000000000 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -100000000000 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(if (<=.f64 lambda2 #s(literal 2420212822470693/295147905179352825856 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(if (<=.f64 phi1 #s(literal -1999999999999999966445568 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R) (if (<=.f64 phi1 #s(literal 607985949695017/2251799813685248 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) #s(approx (* (sin phi2) (sin phi1)) (*.f64 phi1 (sin.f64 phi2)))))) R) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))))
(if (<=.f64 phi1 #s(literal -1999999999999999966445568 binary64)) (*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (if (<=.f64 phi1 #s(literal 607985949695017/2251799813685248 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(approx (* (sin phi2) (sin phi1)) (*.f64 phi1 (sin.f64 phi2))))))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 R)))))
(if (<=.f64 phi2 #s(literal -7366891713276647/18889465931478580854784 binary64)) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (if (<=.f64 phi2 #s(literal 1357680363825023/147573952589676412928 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1))))) R) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))))
(if (<=.f64 phi2 #s(literal -7366891713276647/18889465931478580854784 binary64)) (*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (if (<=.f64 phi2 #s(literal 1357680363825023/147573952589676412928 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2))))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 R)))))
(if (<=.f64 phi2 #s(literal -4835703278458517/9671406556917033397649408 binary64)) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (if (<=.f64 phi2 #s(literal 3172221350668787/154742504910672534362390528 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (neg.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))))
(if (<=.f64 phi2 #s(literal -4835703278458517/9671406556917033397649408 binary64)) (*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (if (<=.f64 phi2 #s(literal 3172221350668787/154742504910672534362390528 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (fma.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) R (*.f64 (asin.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 R)))))
(if (<=.f64 phi2 #s(literal -4835703278458517/9671406556917033397649408 binary64)) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (if (<=.f64 phi2 #s(literal 3172221350668787/154742504910672534362390528 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
(if (<=.f64 phi2 #s(literal -4835703278458517/9671406556917033397649408 binary64)) (*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (if (<=.f64 phi2 #s(literal 3172221350668787/154742504910672534362390528 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(if (<=.f64 phi2 #s(literal -4835703278458517/9671406556917033397649408 binary64)) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (if (<=.f64 phi2 #s(literal 3172221350668787/154742504910672534362390528 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)))
(if (<=.f64 phi2 #s(literal -4835703278458517/9671406556917033397649408 binary64)) (*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (if (<=.f64 phi2 #s(literal 3172221350668787/154742504910672534362390528 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(if (<=.f64 phi1 #s(literal -1380000000000000036057810836295478376991357913979448994027682606746000766311264399193596348486503636103450765117756380556709765719226045321539692307029182667538992209960895727282102704285132000322007923290754165323549605101568 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal -7673845534663173/1180591620717411303424 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 607985949695017/2251799813685248 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R) (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R))))
(if (<=.f64 phi1 #s(literal -1380000000000000036057810836295478376991357913979448994027682606746000766311264399193596348486503636103450765117756380556709765719226045321539692307029182667538992209960895727282102704285132000322007923290754165323549605101568 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (if (<=.f64 phi1 #s(literal -7673845534663173/1180591620717411303424 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (if (<=.f64 phi1 #s(literal 607985949695017/2251799813685248 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (*.f64 R (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))))
(if (<=.f64 phi1 #s(literal -1380000000000000036057810836295478376991357913979448994027682606746000766311264399193596348486503636103450765117756380556709765719226045321539692307029182667538992209960895727282102704285132000322007923290754165323549605101568 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal -7673845534663173/1180591620717411303424 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 607985949695017/2251799813685248 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))))
(if (<=.f64 phi1 #s(literal -1380000000000000036057810836295478376991357913979448994027682606746000766311264399193596348486503636103450765117756380556709765719226045321539692307029182667538992209960895727282102704285132000322007923290754165323549605101568 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (if (<=.f64 phi1 #s(literal -7673845534663173/1180591620717411303424 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (if (<=.f64 phi1 #s(literal 607985949695017/2251799813685248 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))))
(if (<=.f64 phi1 #s(literal -1380000000000000036057810836295478376991357913979448994027682606746000766311264399193596348486503636103450765117756380556709765719226045321539692307029182667538992209960895727282102704285132000322007923290754165323549605101568 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal -7673845534663173/1180591620717411303424 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 607985949695017/2251799813685248 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))))
(if (<=.f64 phi1 #s(literal -1380000000000000036057810836295478376991357913979448994027682606746000766311264399193596348486503636103450765117756380556709765719226045321539692307029182667538992209960895727282102704285132000322007923290754165323549605101568 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (if (<=.f64 phi1 #s(literal -7673845534663173/1180591620717411303424 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi1)) (cos phi2)) (* (sin phi1) (sin phi2)))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (if (<=.f64 phi1 #s(literal 607985949695017/2251799813685248 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))))
(if (<=.f64 lambda2 #s(literal -8500259669165361/18889465931478580854784 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R) (if (<=.f64 lambda2 #s(literal 1350 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)))
(if (<=.f64 lambda2 #s(literal -8500259669165361/18889465931478580854784 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (if (<=.f64 lambda2 #s(literal 1350 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(if (<=.f64 phi1 #s(literal -3602879701896397/9007199254740992 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R) (if (<=.f64 phi1 #s(literal 4061235175267895/9444732965739290427392 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)))
(if (<=.f64 phi1 #s(literal -3602879701896397/9007199254740992 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (if (<=.f64 phi1 #s(literal 4061235175267895/9444732965739290427392 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(if (<=.f64 phi1 #s(literal -390000000000 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 607985949695017/2251799813685248 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R) (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)))
(if (<=.f64 phi1 #s(literal -390000000000 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (if (<=.f64 phi1 #s(literal 607985949695017/2251799813685248 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (*.f64 R (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))))
(if (<=.f64 phi1 #s(literal -3039929748475085/1125899906842624 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 5291729562160333/2251799813685248 binary64)) (*.f64 (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)))
(if (<=.f64 phi1 #s(literal -3039929748475085/1125899906842624 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (if (<=.f64 phi1 #s(literal 5291729562160333/2251799813685248 binary64)) (*.f64 R (acos.f64 (+.f64 #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 R (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))))
(if (<=.f64 phi1 #s(literal -5/2 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 5584463537939415/18014398509481984 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 phi1 (sin.f64 phi2)))))) R) (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)))
(if (<=.f64 phi1 #s(literal -5/2 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (if (<=.f64 phi1 #s(literal 5584463537939415/18014398509481984 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (*.f64 phi1 (sin.f64 phi2)) (fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64))))))) (*.f64 R (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))))
(if (<=.f64 phi1 #s(literal -175000000000000 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R))
(if (<=.f64 phi1 #s(literal -175000000000000 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
(if (<=.f64 phi1 #s(literal -175000000000000 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R))
(if (<=.f64 phi1 #s(literal -175000000000000 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))))) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
(if (<=.f64 lambda1 #s(literal -6794758302677299/348449143727040986586495598010130648530944 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (if (<=.f64 lambda1 #s(literal -1324549306229467/3579862989809370150552347991709354811340217396521331566180181212788883000669113019918160533228078546928669938652374965009299607594634172087555628255195572452564109288497401512783350157684872347030630001028968155934491319200842197951919848388309286912 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R)))
(if (<=.f64 lambda1 #s(literal -6794758302677299/348449143727040986586495598010130648530944 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))) (if (<=.f64 lambda1 #s(literal -1324549306229467/3579862989809370150552347991709354811340217396521331566180181212788883000669113019918160533228078546928669938652374965009299607594634172087555628255195572452564109288497401512783350157684872347030630001028968155934491319200842197951919848388309286912 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (* (* (sin lambda1) (sin lambda2)) (cos phi2)) (cos phi1)) (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (cos lambda2) (cos lambda1)))))) #s(approx (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))))) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))))))
(if (<=.f64 lambda2 #s(literal 170000000000000 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R))
(if (<=.f64 lambda2 #s(literal 170000000000000 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))))
(if (<=.f64 lambda2 #s(literal 3600000000000 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R))
(if (<=.f64 lambda2 #s(literal 3600000000000 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -100000000000 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64))))))) R))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -100000000000 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1)))))) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) #s(approx (+ (* lambda1 (+ (* lambda1 (* (cos lambda2) -1/2)) (sin lambda2))) (cos lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)))))))))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))))))
(if (<=.f64 lambda2 #s(literal 2420212822470693/295147905179352825856 binary64)) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R) (*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))) R))
(if (<=.f64 lambda2 #s(literal 2420212822470693/295147905179352825856 binary64)) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))) (*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi2) (cos (- lambda2 lambda1))) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))

soundness1.9s (9.6%)

Memory
-6.2MiB live, 1 987.1MiB allocated
Rules
18 760×lower-fma.f64
18 760×lower-fma.f32
16 804×lower-fma.f64
16 804×lower-fma.f32
15 196×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
086325406
1290824966
2622124880
0851623064
071321607
1236421371
2698921323
0904819772
01761
02961
18361
255461
3720461
0842658
01833258
15703232
217103191
331193166
468473165
081922972
074927637
1251325564
2750425501
0806623429
072517
0127466
1416463
23094463
010492442
Stop Event
fuel
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
Compiler

Compiled 3 324 to 1 686 computations (49.3% saved)

preprocess223.0ms (1.1%)

Memory
23.7MiB live, 538.6MiB allocated
Remove

(sort phi1 phi2)

(sort lambda1 lambda2)

(negabs R)

Compiler

Compiled 3 032 to 958 computations (68.4% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...